Cod sursa(job #218108)

Utilizator n3vraxPopa Tiberiu n3vrax Data 31 octombrie 2008 20:26:42
Problema Factorial Scor 15
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
#include<stdio.h>

int main()
{
 FILE *f,*g;
 long p;
	f=fopen("fact.in","r");
	g=fopen("fact.out","w");
	fscanf(f,"%ld",&p);
	if(p==0) {fprintf(g,"%d",1);return 0;}
	long  ps=p*5,d=0;
		while(ps>0)
			 {ps=ps-25; d++;}
	long n=p*5-5*(d-1);
	fprintf(g,"%ld",n);
	fclose(f);
	fclose(g);
	return 0;
}