Cod sursa(job #278128)

Utilizator AnteusPatrascoiu Mihai Anteus Data 12 martie 2009 09:25:58
Problema Frac Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include <fstream.h>
ifstream fin("frac.in");
ofstream fout("frac.out");
long long n,p,v[1000],i,d,j,sw,k;
int main() {
fin>>n>>p;
for (i=2;i<=n/2;i++)
	if (n%i==0)
		{  v[i]=1;  d=i;  }
for (i=1;i<=10000000;i++)
	{
	sw=0;
	for (j=2;j<=d;j++)
		if (v[j]!=0)
			if (i%j==0)
				{ sw=1; break; }
	if (sw==0)
		k++;
	if (k==p)
	   {  fout<<i;  break;  }
	}
return 0;
}