Cod sursa(job #275379)

Utilizator valentinroscaRosca Valentin valentinrosca Data 10 martie 2009 13:44:17
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
#include<fstream.h>
#include<math.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long n,i,j,s,ci,cj,r;
int main()
{
	fin>>n;
	for(i=1;i<=n;i++)
	{
		for(j=1;;j<n;j++)
		{
			ci=i;
			cj=j;
			do
			{
				r=cj%ci;
				cj=ci;
				ci=r;
			}
			while(r);
			if(cj==1)
				s=s+2;
		}
	}
	fout<<s;
	return 0;
}