| 比赛 | NOIP_1 | 评测结果 | AAAAAAAAAA |
|---|---|---|---|
| 题目名称 | 圆弦 | 最终得分 | 100 |
| 用户昵称 | zpl123 | 运行时间 | 0.000 s |
| 代码语言 | Pascal | 内存使用 | 0.00 MiB |
| 提交时间 | 2008-10-12 11:43:37 | ||
program circlex;
var
x:array[0..1000]of longint;
i,n,k:longint;
begin
assign(input,'circlex.in');
reset(input);
assign(output,'circlex.out');
rewrite(output);
readln(n);
close(input);
x[0]:=1;
x[1]:=1;
for i:=2 to n do
begin
for k:=0 to i-2 do
x[i]:=(x[i]+x[k]*x[i-2-k])mod 12345;
x[i]:=(x[i]+x[i-1]) mod 12345;
end;
writeln(x[n]);
close(output);
end.