Submission #2790892

---

Source Code Expand

N, L = gets.split.map(&:to_i)
xs, ds = [], []
N.times do |i|
    xs[i], ds[i] = gets.split
end
xs.map!(&:to_i)
xs.push(L+1, L+2, L+3)
ds.push('R', 'L', 'R')

right = []
left = []
ans = 0
xs.length.times do |i|
    x = xs[i]
    d = ds[i]
    if d == 'L'
        left.push(x)
    else
        if left.length == 0
            right.push(x)
        else
            right = [0] if right.length == 0
            if right.length < left.length
                rp = right[-1]
                lp = rp + 1
            else
                lp = left[0]
                rp = lp - 1
            end
            right.length.times do |j|
                ans += rp - j - right[-j]
            end
            left.length.times do |j|
                ans += left[j] - (lp + j)
            end
            left = []
            right = [x]
        end
    end
end
puts ans

Submission Info

Judge Result