Cod sursa(job #21012)

Utilizator FlorianFlorian Marcu Florian Data 22 februarie 2007 20:02:49
Problema Factorial Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<stdio.h>
int main()
{long i,x,n,k,p;
FILE *f=fopen("fact.in","r");
FILE *g=fopen("fact.out","w");
fscanf (f,"%ld",&p);
if (p==1) fprintf(g,"1");
else {
i=5;
k=1;
	 while (k<p)
			{i=i+5;
			x=i;
			while (x%5==0) {k++;x=x/5;}
			if (k==p) n=i;
			else n=-1;
			}
fprintf(g,"%ld",n); }
fclose(f);
fclose(g);
return 0;}