Cod sursa(job #1512221)

Utilizator Cezar_MihalceaCezar Mihalcea Cezar_Mihalcea Data 27 octombrie 2015 19:55:35
Problema Al k-lea termen Fibonacci Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 0.93 kb
#include<fstream>
using namespace std;

ifstream f("kfib.in");
ofstream g("kfib.out");

const int m=666013;

long long a[3][3],p[3][3];

void produs(long long a[3][3], long long b[3][3])
{
    int i,j,k,aux[3][3];
    for(i=0;i<3;i++)
        for(j=0;j<3;j++)
        {
            aux[i][j]=0;
            for(k=0;k<3;k++)
                aux[i][j]+=a[i][k]*b[k][j]%m;
        }
    for(i=0;i<3;i++)
        for(j=0;j<3;j++)
            a[i][j]=aux[i][j];
}

void fib(int n)
{
    p[0][0]=1;
    p[1][1]=1;
    p[2][2]=1;
    a[0][0]=1;
    a[0][1]=1;
    a[1][0]=1;
    a[2][1]=1;
    while(n!=0)
    {
        if(n%2==1)
            produs(p,a);
        produs(a,a);
        n/=2;
    }
}

void afismat(long long a[3][3])
{
    int i,j;
    for(i=0;i<3;i++)
    {
        for(j=0;j<3;j++)
            g<<a[i][j]<<" ";
        g<<"\n";
    }
    g<<"\n";

}

int main()
{
    int n;
    f>>n;
    fib(n-2);
    g<<(p[0][0]+p[0][1])%m;
    return 0;
}