Dwarf Home

文科生的悲哀-90min-数论

Hint

1、按照题目思路写递推，连看题共10分钟，余下80分钟waiting+debug
2、qword的胜利，于是我就没有mod 7654321
3、这题不是明摆着斐波那契数列
4、最后WA，数列第一项、第二项输出0，80分
5、我无限逼近于2B

1
2
3
4
5
6
7
8
9
10
11
12
13
14

var n,i:longint;
    f:array[1..4] of longint;
begin
  readln(n);
  f[1]:=1;
  f[2]:=1;
  f[3]:=1;
  for i:=3 to n do begin
    f[3]:=(f[1]+f[2]) mod 7654321;
    f[1]:=f[2];
    f[2]:=f[3];
  end;
  writeln(f[3]);
end.

编译通过…
├ 测试数据 01：答案正确… 0ms
├ 测试数据 02：答案正确… 0ms
├ 测试数据 03：答案正确… 0ms
├ 测试数据 04：答案正确… 0ms
├ 测试数据 05：答案正确… 0ms
├ 测试数据 06：答案正确… 0ms
├ 测试数据 07：答案正确… 0ms
├ 测试数据 08：答案正确… 0ms
├ 测试数据 09：答案正确… 0ms
├ 测试数据 10：答案正确… 0ms
————————-
Accepted 有效得分：100 有效耗时：0ms