/ Vijos / 讨论 / 分享 /

模拟赛第三题我怎么会超时?

var n,k,i,j:longint;

f:array[1..200,0..200] of longint;

begin

readln(n,k);

for i:= 1 to n do

begin

f:=1; f:=1;

end;

for i:= 2 to n do

for j:= 1 to i-2 do

f:=((i-j)*f+(j+1)*f) mod 2009;

writeln(f[n,k]);

end.

给个理由啊

8 条评论

  • @ 2009-08-09 09:59:29

    汗...我大号也是读入错光...晕倒

    汗...我大号也是读入错光...晕倒

  • @ 2009-08-09 09:50:15

    ORZ

    ORZ^

  • @ 2009-08-09 09:39:53

    55555

    春哥我背叛了你 我再也不信曾哥了

  • @ 2009-08-09 08:39:21

    RT

    我看到了多行,最后忘了MOD 2009

  • @ 2009-08-09 08:30:03

    题目描述是不是后来改过?

    为什么我们学校6个人都没有看到输入有多行...

    结果全是 运行超时 格式错误

    难不成我们的RP差的这么离谱?!

  • @ 2009-08-08 22:00:12

    多组

    while not eof

    begin

    ...

    ...

    ...

    end;

  • @ 2009-08-08 21:27:36

    没为什么~

    因为你

    !~~~

    不信春歌~

  • @ 2009-08-08 21:26:34

    有多个输入

  • 1