Cod sursa(job #26363)

Utilizator eraser_aCarp Andrei eraser_a Data 5 martie 2007 15:20:34
Problema Factorial Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<stdio.h>
#include<math.h>

void main()
{
 int p;
 FILE *f,*g;
 f=fopen("fact.in","r");
 g=fopen("fact.out","w");
 fscanf(f,"%d",&p);
 if(p==0)
	 fprintf(g,"%d",1);
 else{
	int k=0;
	int i=1;
	while(pow(5,i+1)<5*p){
		k=k+i;
		i++;
		}
 fprintf(g,"%d",5*(p-k));
	 }



   fclose(f);
 fclose(g);

}