-- Question C 

import Control.Applicative
import Control.Monad

main = do
  n <- readLn ::IO Integer
  xs <- map read . words <$> getContents 
  putStrLn $ show (check xs)
  
elemCountOnce :: [Int] -> [(Int, Int)]
elemCountOnce [] = []
elemCountOnce (x:xs) = (x, (length $ filter (== x) xs) + 1) : elemCountOnce (filter (/= x) xs)

check xs = length (filter odd (map snd (elemCountOnce xs)))