ll@n,@a[n]--,v[n]{},z=0;
rep(i,n){
	int j=i;
	while(!v[j]){
		v[j]=~i;
		j=a[j];
	}
	z+=v[j]==~i;
}
wt(z);