Cod sursa(job #604941)

Utilizator CristibaluCristi B Cristibalu Data 26 iulie 2011 11:05:32
Problema Factorial Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.51 kb
#include <fstream.h>

long p,m,n,nr;

ifstream f("fact.in");
ofstream g("fact.out");

int main()
{
	f>>p;
	n=0;nr=0;n=0;
	while(nr<p)
	{
		n++;
		m=n;
		long div=2;
		while(m!=1)
		{
			if(m%div==0)
			{
				long ok=0;
				for(long i=2;i<=div/2;i++)
					if(div%i==0)
						ok=1;
				if(ok==0)
				{
					m=m/div;
					if(div==5)
						nr++;
				}
			}
			else
				div++;
		}
			
	}
	if(nr==p)
		if(p!=0)
			g<<n;
	if(nr>p) 
		if(p!=0)
			g<<"-1";
	if(p==0)
		g<<"1";
	return 0;
}