Cod sursa(job #453163)

Utilizator bmanBalauta Bogdan bman Data 10 mai 2010 22:46:40
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 

#include<fstream>

int prim(int a, int b)
{	while(a!=b)
	{	if(a>b)a=a-b;
		else b=b-a;
	}
	if(a==1) return 1;
	return 0;
}

void main()
{	long n;
	ifstream in("fractii.in");
	in>>n;
	in.close();
	int s=0;
	for(int i=1;i<=n;i++)
		for(int j=1;j<=n;j++)
			if(prim(i,j))
				s++;
	ofstream out("fractii.out");
	out<<s;
	out.close();
}