Cod sursa(job #2953)

Utilizator d_tritusPopovici Alexandru d_tritus Data 19 decembrie 2006 23:47:31
Problema Frac Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
#include <stdio.h>
FILE *fi;
FILE *fo;
__int64 n, p, i=0, k=0;
int prim (__int64 x, __int64 y) {
__int64 r;
r=x%y;
while (r) {
x=y;
y=r;
r=x%y;
}
if (y==1) return 1;
return 0;
}
int main (void) {
	fi=fopen("frac.in", "rt");
	fo=fopen("frac.out", "wt");
	fscanf (fi, "%lld %lld", &n, &p);
	while (k!=p) {
	i++;
	if (prim(i, n)==1) k++;
	} 
	fprintf(fo, "%lld\n", i);
	fcloseall();
	return 0;
}