n = gets.to_i
items = Array.new(10) { 0 }
ans = rest = 0

n.times do
  gets.split.map { |e| items[e.to_i - 1] += 1 }
end

items.each do |e|
  q, r = e.divmod(2)
  ans += q
  rest += r
end

ans += rest / 4
puts ans