记录编号	4505	评测结果	WWWWWWWWWW
题目名称	查数	最终得分	0
用户昵称	书剑飘零	是否通过	未通过
代码语言	Pascal	运行时间	0.001 s
提交时间	2008-10-20 19:22:51	内存使用	0.12 MiB

program tz;   
var f:array[1..1000,1..2]of longint;    
a,b,c,d,i,j,k,m,n:longint;f1,f2:text;   
begin    
assign(f1,'chashu.in');   
assign(f2,'chashu.out');   
reset(f1);   
rewrite(f2);   
readln(f1,n);    
f[1,1]:=0;f[1,2]:=1;    
for i:=0 to n do    
begin    
f[i,1]:=(f[i-1,2]+f[i-1,1]*8)mod 12345;    
f[i,2]:=(f[i-1,1]+f[i-1,2]*8)mod 12345;    
end;    
writeln(f2,f[n,1]);  
close(f1);
close(f2);  
end.