Cod sursa(job #969605)

Utilizator alex_HarryBabalau Alexandru alex_Harry Data 4 iulie 2013 19:27:26
Problema Al k-lea termen Fibonacci Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 0.83 kb
#include <fstream>
#define MOD 666013
using namespace std;
ifstream f("kfib.in");
ofstream g("kfib.out");
int K,M[5][5],Z[5][5],Aux[5][5];
void mul(int A[][5],int B[][5],int C[][5])
{
    for(int i=1;i<=3;i++)
        for(int j=1;j<=3;j++)
        {
            C[i][j]=0;
            for(int k=1;k<=3;k++)
                C[i][j]=(C[i][j]+(1LL*A[i][k]*B[k][j])%MOD)%MOD;

        }

}
void copy(int A[][5],int B[][5])
{
for(int i=1;i<=3;i++)
        for(int j=1;j<=3;j++)
            A[i][j]=B[i][j];
}
int main()
{
    f>>K;K--;
    M[1][1]=M[1][2]=1;
    Z[1][2]=Z[2][1]=Z[2][2]=1;
    while(K)
    {
        if(K%2==1)
            {
            mul(M,Z,Aux);
            copy(M,Aux);
            }
        mul(Z,Z,Aux);
        copy(Z,Aux);
        K=K/2;
    }
    g<<M[1][1]<<"\n";
    return 0;
}