Cod sursa(job #9026)

Utilizator vali_miValy Mihai vali_mi Data 26 ianuarie 2007 13:39:18
Problema Factorial Scor 60
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
Raporteaza aceasta sursa 
#include<stdio.h>
FILE *f1,*f2;
int main()
{long unsigned x,p,nrp,nrad;
f1=fopen("fact.in","r");
fscanf(f1,"%lu",&p);
fclose(f1);
if(p==0)
x=1;
else{
nrad=0;nrp=p-p%5;
while (nrp>=5){
nrad+=5;nrp-=5;
x=nrad;
while(x%5==0)
{x=x/5;nrp--;}
}
nrad=nrad+p%5+nrp;
x=nrad*5;}
f2=fopen("fact.out","w");
fprintf(f2,"%lu",x);
fclose(f2);
return 0;
}