Cod sursa(job #1370112)

Utilizator western100Sutu Eusebiu western100 Data 3 martie 2015 13:00:54
Problema Al k-lea termen Fibonacci Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 0.32 kb
Raporteaza aceasta sursa 
#include <fstream>

using namespace std;

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

int main()
{
    int P=1332028;
    int i,k,a1,a2,a3;
    f>>k;
    k%=P;
    a1=1;
    a2=0;
    for(i=1;i<=k;i++)
    {
        a3=(a1+a2)%666013;
        a1=a2;
        a2=a3;
    }
    g<<a2;
    return 0;
}