Cod sursa(job #335029)

Utilizator shugubetzushugubetzu shugubetzu Data 28 iulie 2009 13:58:31
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include<fstream>
using namespace std;

int euclid (int a, int b)
{
	int r = a%b;
    if (a < b)
		{ r=a; a=b; b=r; }
	while (r)
		{
			r = a%b;
			a=b;
			b=r;
		}
	return a;
}

int main()
{
	fstream f ("fractii.in", ios::in);
	fstream g ("fractii.out", ios::out);

	int n,p,q;
	f>>n;
	int k=2*n-1;

	for (p=2; p<=n; p++)
		for (q=2; q<=n; q++)
			if (euclid(p,q)==1 || euclid(q,p)==1)
				k++;	
	g<<k;

	f.close();
	g.close();

	return 0;
}