Cod sursa(job #24579)

Utilizator razyelxrazyelx razyelx Data 2 martie 2007 22:06:34
Problema Factorial Scor 15
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include <fstream.h>
#include <math.h>
int main(){
	unsigned long p,k,i,j,m,l;
	ifstream f("fact.in");
	ofstream g("fact.out");
	f>>p;k=0;i=0;j=0;m=2;l=2;
	while(k<p){
		i+=5;
		if(j==4){
			if((i==pow(5,m))||(i/l==pow(5,m-1))){
				k+=m;
				m++;
				j=0;
				if(l==4)l=2;
				if(i/l==pow(5,m))l++;
			}else{
				j=0;
				k+=2;

			}
		}else{
			j++;k++;
		}

	}
	if(k==p)
		g<<i;
	else
        	g<<-1;
	return 0;
}