import Control.Monad
import qualified Data.Map as Map


main = do
    n <- readLn
    nums <- replicateM n getLine
    print $ Map.size $ Map.filter odd $ countByValue nums


countByValue :: [String] -> Map.Map String Int
countByValue [] = Map.empty
countByValue (x:xs) = Map.insertWith (+) x 1 $ countByValue xs
