记录编号 | 3340 | 评测结果 | AAAAAAAAAA | ||
---|---|---|---|---|---|
题目名称 | 铺砖 | 最终得分 | 100 | ||
用户昵称 | WaterFire | 是否通过 | 通过 | ||
代码语言 | Pascal | 运行时间 | 0.035 s | ||
提交时间 | 2008-10-06 18:11:02 | 内存使用 | 38.26 MiB | ||
program waterfire; const fin='puzhuan.in'; fout='puzhuan.out'; var f,g:text; n,ans,i,j:longint; data:array[1..10000000] of longint; begin assign(f,fin);reset(f); assign(g,fout);rewrite(g); read(f,n); data[1]:=1; data[2]:=3; for i:=3 to n do data[i]:=(data[i-1]+data[i-2]*2) mod 12345; write(g,data[n]); close(f); close(g); end.