Cod sursa(job #598699)

Utilizator dspMihaiDespotovici Mihai dspMihai 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
Raporteaza aceasta sursa 
#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;
}