Cod sursa(job #515303)

Utilizator lily3Moldovan Liliana lily3 Data 20 decembrie 2010 23:42:51
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.71 kb
/*#include<fstream>
using namespace std;

int i,j,m,a[1000001];
unsigned long long rez,n;
int main()
{
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	f>>n;
	rez=n*n;
	m=0;
	for(i=2;i<=n/2;i++)
	{
		m=1;
		if(a[i]==0)
		{
		for(j=i+i;j<=n;j+=i)
		{
			++m;
			a[j]=1;
		}
		rez-=(m*(m-1));
		}
		
	}
	g<<rez<<"\n";
	rez=rez-(n-1);
	g<<rez;
	return 0;
}*/
#include<fstream>

using namespace std;

unsigned long long n,nr,i,j;
int cmmdc(int a,int b)
{
	int r;
	r=a%b;
	while(r)
	{
		a=b;
		b=r;
		r=a%b;
	}
	return b;
}
int main()
{
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	f>>n;
	for(i=1;i<=n;i++)
		for(j=1;j<=n;j++)
			if(cmmdc(i,j)==1)
				nr++;
			g<<nr;
		return 0;
}