local ior = io.input()
local t = {}
for i = 1, 1280 do t[i] = false end
local n, lb, rb = ior:read("*n", "*n", "*n")
-- ASSERT 0 < lb
for i = lb, rb do t[i] = true end
local enemy = {}

local mmi, mma = math.min, math.max
for i = 1, n do
  local l, _unused, r, h = ior:read("*n", "*n", "*n", "*n")
  local tmp = {}
  tmp.l, tmp.r, tmp.h, tmp.idx, tmp.st = l, r, h, i, 0
  enemy[i] = tmp
end

table.sort(enemy, function(x, y)
  return x.h > y.h
end)

for i = 1, n do
  local enm = enemy[i]
  for j = enm.l, enm.r do
    if(t[j]) then
      enm.st = 1
    end
    t[j] = false
  end
end

table.sort(enemy, function(x, y)
  return x.idx < y.idx
end)

for i = 1, n do
  print(enemy[i].st)
end