import Control.Monad
import Data.List

main :: IO ()
main = readLn >>= flip replicateM readLn >>= print . solve

solve :: [Int] -> Int
solve = foldl' ff 0 . group . sort
    where
        ff acc x
            | odd (length x) = acc + 1
            | otherwise = acc
