比赛 | NOIP_5 | 评测结果 | AAAAAAAAAA |
---|---|---|---|
题目名称 | 行进方案 | 最终得分 | 100 |
用户昵称 | zxc111 | 运行时间 | 0.000 s |
代码语言 | Pascal | 内存使用 | 0.00 MiB |
提交时间 | 2008-09-24 20:02:45 | ||
program ooo; var a:array[1..1000] of longint; i,j,k:longint; t:text; begin assign(t,'zbfa.in'); reset(t); readln(t,k); close(t); a[1]:=3; a[2]:=7; for i:=3 to k do a[i]:=(a[i-1]*2+a[i-2])mod 12345; assign(t,'zbfa.out'); rewrite(t); write(t,a[k]); close(t); end.