local n = io.read("*n")
local a = {}
local b = {}
for i = 1, n do
  a[i], b[i] = io.read("*n", "*n")
end
local m = io.read("*n")
local ms = {}
max = 0
for j = 1, m do
  local cnt = 0
  local c, d = io.read("*n", "*n")
  for i = 1, n do
    if(c <= a[i] and b[i] <= d) then
      cnt = cnt + 1
    end
  end
  ms[j] = cnt
  max = math.max(max, cnt)
end
if(max == 0) then print(0) else
  for j = 1, m do
    if(ms[j] == max) then print(j) end
  end
end