Cod sursa(job #598699)
Utilizator | Data | 26 iunie 2011 18:48:43 | |
---|---|---|---|
Problema | Al k-lea termen Fibonacci | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva educationala | Marime | 0.32 kb |
#include <stdio.h>
long k;
long fib_k (long x)
{
if (x==1) return 1;
else if (x==0) return 0;
else return (fib_k(x-1)+fib_k(x-2))%666013;
}
int main ()
{
FILE *f,*g;
f=fopen("kfib.in", "r");
g=fopen("kfib.out", "w");
fscanf(f, "%d", &k);
fprintf(g, "%d", fib_k(k));
fclose(f); fclose(g);
return 0;
}