Pagini recente » Rating David si Goliat (pocaitu) | Monitorul de evaluare | Clasament Grigore Moisil 2009, clasa a 10a | Profil UPT-Teudan-Vijdea-Retzler | Cod sursa (job #1279071)
//factorial
#include <stdio.h>
#include <stdlib.h>
int fact(int *p)
{
int i=2,k2=0,k5=0,j,y;
while(k2=*p)
{
y=i;
for(j=2;j<=y;j++)
{
if(y%j==0)
{
if(j==2 && k2!=*p) k2++;
y/=j;
j=1;
}
}
i+=2;
}
i=5;
while(k5!=*p)
{
y=i;
for(j=5;j<=y;j++)
{
if(y%j==0)
{
if(j==5 && k5!=*p) k5++;
y/=j;
j==4;
if(k5==*p) return i;
}
}
i+=5;
}
}
int main()
{
int p;
FILE *fp,*f;
fp=fopen("fact.in","r");
f=fopen("fact.out","w");
fscanf(fp,"%d",&p);
fprintf(f,"%d",fact(&p));
fclose(fp);
fclose(f);
}