implicit none
integer(8):: i,j,k,n,ans
integer(8),allocatable,dimension(:):: num,count
 
read (5,*) n

allocate(num(n))
allocate(count(n))
count=1
ans=0

do i=1,n
    read (5,*) num(i)
enddo

do i=1, n
    do j=i+1, n
        if (num(i)==num(j) .and. num(j)/=-1) then
            count(i)=count(i)+1
            num(j)=-1
        else if(num(i)==-1) then
            count(i)=0
        endif
    enddo
enddo

if (num(n)==-1) then
    count(n)=0
else
    count(n)=1
endif

do i=1,n
    ans=ans+mod(count(i),2)
enddo



write(6,"(i0)") ans
stop
end


