Fibonacci sequence

Description

 （5）  （0）  举报  收藏



题解：

  水水的矩阵乘法（终于发现以前做的有用啦~~）

提示

   随时mod 10000

（博主太机智，他写的很少，我才不给你们转载的机会！！）代码：
矩阵：010
111
001
var
i,j,k:longint;

begin

fillchar(cheng,sizeof(cheng),0);

for
i:=1
to
3
do

for
j:=1
to
3
do

for
k:=1
to
3
do

c[i,j]:=(c[i,j]+x[i,k]*y[k,j])mod10000;

end;