农夫约翰的奶牛通常是按1到N进行编号的，奶牛们相互之间有一种特殊的信息传输方式。

农夫约翰的奶牛通常是按1到N进行编号的，奶牛们相互之间有一种特殊的信息传输方式。

var n:longint;
a:array[1..1000] of longint;
b:array[1..1000] of boolean;

procedure init;
var i:longint;
begin
readln(n);
for i:=1 to n do
readln(a[i]);
end;

procedure work;
var i,j:longint;
bz:array[0..1000] of boolean;
begin
for i:=1 to n do
begin
j:=i;
fillchar(bz,sizeof(bz),0);
while j>0 do
begin
if bz[j] then
begin
bz[0]:=true;
break;
end;
bz[j]:=true;
j:=a[j];
end;
if bz[0] then
for j:=1 to n do
if bz[j] then b[j]:=true;
end;
end;

procedure out;
var i,ans:longint;
begin
ans:=n;
for i:=1 to n do
if b[i] then dec(ans);
writeln(ans);
end;

begin
assign(input,'relay.in');reset(input);
assign(output,'relay.out');rewrite(output);

init;
work;
out;

close(input);close(output);
end.