Cod sursa(job #72986)

Utilizator cimpean_iuliancimpean iulian cimpean_iulian Data 16 iulie 2007 01:08:19
Problema Factorial Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<stdio.h>
int main()
{
FILE *f;
int nr=0,p,t=0,m=0,q;
f=fopen("fact.in","r");
fscanf(f,"%d",&p);
if(!p){f=fopen("fact.out","w"); fprintf(f,"%d",1);}
else{
fclose(f);
while(nr<p)
{
if(p>(nr+4)) {nr+=5;m+=5;t+=5;while(!(q%5)){q=q/5;nr++;}}
else {m+=p-nr;nr=p;}
}
f=fopen("fact.out","w");
if(nr==p) fprintf(f,"%d",m*5);
else fprintf(f,"%d",-1);}
return 0;}