Cod sursa(job #272791)

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