Pagini recente » Cod sursa (job #1304933) | Cod sursa (job #2037914) | Cod sursa (job #762076) | Cod sursa (job #2152170) | Cod sursa (job #137898)
Cod sursa(job #137898)
#include<stdio.h>
long int n,k,i,x[105],sol[1000],uc,prim[105],j,xx,e,m;
int main()
{
FILE *f,*g;f=fopen("factoriale.in","r");g=fopen("factoriale.out","w");
fscanf(f,"%ld%ld",&n,&k);for(i=1;i<=n;i++)fscanf(f,"%ld",&x[i]);
sol[0]=1;uc=0;
for(i=2;i<=100;i++)
if(!prim[i])
{ for(j=2*i;j<=100;j++)prim[j]=1;
for(j=1;j<=n;j++)
{ xx=x[i]/j;
while(xx)
{ e+=xx;xx/=i;}
}
if(e%k)
{ e%=k;e=k-e;
while(e)
{ for(m=0;m<=uc;m++)sol[m]*=i;
for(m=0;m<=uc;m++){sol[m+1]=sol[m+1]+sol[m]/10;sol[m]%=10;}
while(sol[uc+1]){uc++;sol[uc+1]=sol[uc]/10;}
e--;
}
}
}
for(i=uc;i>=0;i--)fprintf(g,"%ld",sol[i]);
fprintf(g,"\n");
fcloseall();return 0;
}