记录编号	1819	评测结果	AAAAAAAAAA
题目名称	83.圆弦	最终得分	100
用户昵称	卐祭司卐	是否通过	通过
代码语言	Pascal	运行时间	0.291 s
提交时间	2008-09-08 20:27:14	内存使用	0.12 MiB

program lanlan;
var
  a:array[0..1000] of int64;
  i,n,k:longint;
  fi,fo:text;
begin
  assign(fi,'circlex.in');assign(fo,'circlex.out');
  reset(fi);rewrite(fo);
  readln(fi,n);
  a[0]:=1;
  a[1]:=1;
  for i:=2 to n do begin
    for k:=0 to i-2 do
     a[i]:=(a[i]+a[k]*a[i-2-k]) mod 12345;
    a[i]:=(a[i-1]+a[i])mod 12345;
  end;
  write(fo,a[n]);
  close(fi);close(fo);
end.