Cod sursa(job #52854)

Utilizator DastasIonescu Vlad Dastas Data 20 aprilie 2007 09:56:43
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include <fstream.h>

ifstream in("fractii.in");
ofstream out("fractii.out");
int n;

int prim(int a, int b)
{
	while ( b )
	{
		int t = b;
		b = a % b;
		a = t;
	}

	return a;
}

int coprim(int x)
{
	int k=0;
	for ( int i = 1; i <= n; ++i )
		if ( x != i )
			if ( prim(x, i) == 1 )
				++k;
	return k;
}

int main()
{
	in >> n;
	int s = 0;
	for ( int i = 1; i <= n; ++i )
		s += coprim(i);

	out << s+1 << endl;

	return 0;
}