import Control.Monad
import Data.List

main = do
    n <- readLn
    nums <- replicateM n getLine
    nums
        |> group . sort -- 同じ文字ごとにまとめる
        |> map length   -- 文字ごとの出現回数
        |> filter odd   -- 奇数の場合のみ文字が残る
        |> length       -- 残った文字の個数
        |> print


infixl 1 |>
(|>) :: a -> (a -> b) -> b
v |> f = f v