记录编号	2450	评测结果	AAAAAAAAAA
题目名称	铺砖	最终得分	100
用户昵称	MayLava	是否通过	通过
代码语言	Pascal	运行时间	0.002 s
提交时间	2008-09-21 16:39:41	内存使用	0.30 MiB

program MayLava;
var
 a:array[1..100000]of integer;
 i,n:longint;
 f:text;
BEGIN
 assign(f,'puzhuan.in');
 reset(f);
 readln(f,n);
 close(f);
 a[1]:=1;
 for i:=2 to n do begin
  a[i]:=(a[i-1]*2) mod 12345;
  if (i mod 2)=0 then inc(a[i])
  else dec(a[i]);
 end;
 assign(f,'puzhuan.out');
 rewrite(f);
 writeln(f,a[n]);
 close(f);
END.