Cod sursa(job #275390)

Utilizator valentinroscaRosca Valentin valentinrosca Data 10 martie 2009 13:50:28
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 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;
	s=n;
	for(i=2;i<=n;i++)
	{
		for(j=1;j<i;j++)
		{
			ci=i;
			cj=j;
			if(cj>ci)
			{
				do
				{
					r=cj%ci;
					cj=ci;
					ci=r;
				}
				while(r);
				if(cj==1)
					s++;
			}
			else
			{
				do
				{
					r=ci%cj;
					ci=cj;
					cj=r;
				}
				while(r);
				if(ci==1)
					s++;
			}
		}
	}
	fout<<s;
	return 0;
}