Cod sursa(job #1794891)

Utilizator Bodo171Bogdan Pop Bodo171 Data 1 noiembrie 2016 20:07:54
Problema Al k-lea termen Fibonacci Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 1.13 kb
#include <iostream>
#include<fstream>
using namespace std;
typedef long long ll;
const ll mod=666013;
ll p2[3][3],fibstd[3][3],rez[3][3],aux[3][3];
int i,j,kp,k,ind;
void mems(ll A[][3])
{
    for(i=0;i<2;i++)
        for(j=0;j<2;j++)
    {
        A[i][j]=0;
    }
}
void memc(ll A[][3],ll B[][3])
{
    for(i=0;i<2;i++)
        for(j=0;j<2;j++)
    {
        A[i][j]=B[i][j];
    }
}
void mult(ll A[][3],ll B[][3],ll C[][3])
{
    for(i=0;i<2;i++)
        for(j=0;j<2;j++)
          for(k=0;k<2;k++)
          {
              C[i][j]+=A[i][k]*B[k][j];
              C[i][j]%=mod;
          }
}
void lgput(int x)
{
    rez[0][0]=1;rez[0][1]=1;
    for(ind=0;(1<<ind)<=x;ind++)
    {
       if(((1<<ind)&x))
        {
            mems(aux);
            mult(rez,p2,aux);
            memc(rez,aux);
        }
        mems(aux);
        mult(p2,p2,aux);
        memc(p2,aux);
    }
}
int main()
{
    ifstream f("kfib.in");
    ofstream g("kfib.out");
    f>>kp;
    p2[0][0]=0,p2[0][1]=1,p2[1][0]=1,p2[1][1]=1;
    fibstd[0][0]=1,fibstd[0][1]=1;
    lgput(kp-1);
    g<<rez[0][0];
    return 0;
}