import Data.List
import Control.Monad

main :: IO ()
main = do
  n <- readLn :: IO Int
  ls <- replicateM n readLn :: IO [Int]
  print $ solve ls

solve :: [Int] -> Int
solve ls = length $ filter odd $ length <$> (group . sort) ls
