Cod sursa(job #361854)

Utilizator ChurchilRadulescu Adrian Churchil Data 6 noiembrie 2009 20:56:11
Problema Factorial Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
#include <stdio.h>
FILE *f;
long int p,n;

int main(){
long a,i,b;	
        f=fopen("factorial.in","r");
	    fscanf(f,"%ld",&p);
		fclose(f);
		a=p/11;
		b=p%11;
		n=1;
		for(i=2;i<=a*100;i++) {
		   n*=i;
		}
		if(b!=0) {
		  for(i=a*100;i<=a*100+b*10;i++) {
		     n*=i;
		  }
		}
		f=fopen("factorial.out","w");
return 0;
}