记录编号	112769	评测结果	ATAAATTTTT
题目名称	[USACO Dec08] 奶牛的糖果	最终得分	40
用户昵称	‘’	是否通过	未通过
代码语言	Pascal	运行时间	6.255 s
提交时间	2014-07-17 08:49:37	内存使用	0.93 MiB

var
a,b:array[1..100000]of longint;
n,i,j,k:longint;
begin
assign(input,'treat.in');
assign(output,'treat.out');
reset(input);
rewrite(output);
readln(n);
for i:=1 to n do
readln(a[i]);
for i:=1 to n do
begin
for j:=1 to n do b[j]:=0;
j:=i;
b[j]:=1;
k:=1;
while b[a[j]]=0 do
begin
b[a[j]]:=1;
k:=k+1;
j:=a[j];
end;
writeln(k);
end;
close(input);
close(output);
end.