local n = io.read("*n")
local a = {}
local am = {}
for i = 1, n do
  local v = io.read("*n")
  a[i] = v
  if not am[v] then am[v] = 1 else am[v] = am[v] + 1 end
end
table.sort(a)
local ret = 0
local mul = 1
while mul < a[n] do
  mul = mul * 2
end
for i = n, 2, -1 do
  local v = a[i]
  while v + v < mul do
    mul = mul // 2
  end
  if am[v] then
    am[v] = am[v] - 1
    if am[v] == 0 then am[v] = nil end
    local dst = mul - v
    if am[dst] then
      ret = ret + 1
      am[dst] = am[dst] - 1
      if am[dst] == 0 then am[dst] = nil end
    end
  end
end
print(ret)
