import Control.Monad
import Data.List
import Data.Maybe
import qualified Data.Set as S
import qualified Data.ByteString.Char8 as B

main :: IO ()
main = do
    n <- read <$> getLine :: IO Int
    ns <- replicateM n (fst . fromJust . B.readInt <$> B.getLine)
    print . S.size $ foldl (\s x -> if S.member x s then S.delete x s else S.insert x s) S.empty ns
