import Control.Monad
import Data.List
main = do
  n <- readLn
  a <- replicateM n getLine
  putStrLn .show $ solved a

solved:: [String] -> Int
solved a = length $ filter odd $ map length $ group $ sort a