记录编号 2775 评测结果 AAAAAAAAAA
题目名称 行进方案 最终得分 100
用户昵称 Gravatar苏轼 是否通过 通过
代码语言 Pascal 运行时间 0.001 s
提交时间 2008-09-27 13:20:31 内存使用 0.11 MiB
显示代码纯文本
program cch(input,output);
var
 f:array[0..1000] of longint;
 i,k:integer;
begin
 assign(input,'zbfa.in');
 assign(output,'zbfa.out');
 reset(input);
 rewrite(output);
 readln(k);
 f[0]:=1; f[1]:=3;
 for i:=2 to k do
  f[i]:=(2*(f[i-1]-f[i-2])+3*f[i-2])mod 12345;
 write(f[k]);
 close(input);
 close(output);
end.