import Control.Monad
import Control.Applicative
import Data.List
import Data.Array

strToInt s = (read :: String -> Int)

main = do

   n <- readLn :: IO Int
   an <- replicateM n (readLn :: IO Int)
   let bn = map length (group (sort an))
   let cn = filter (odd) bn
   print (length cn)