Cod sursa(job #130683)

Utilizator darrenRares Buhai darren Data 1 februarie 2008 17:25:11
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<fstream.h>

int cmmdc (int a, int b);

int main()
{
	ifstream fin("fractii.in");
	ofstream fout("fractii.out");
	int n;
	fin>>n;
	int i=0,j=0,ind=0;
	for (i=1;i<=n;i++)
		for (j=1;j<=n;j++)
		{
			if (cmmdc(i,j)==1)
			ind++;
		}
	fout<<ind;
	return 0;
}

int cmmdc (int a,int b)
{
	if (a==b)
	return a;
	if (a==0)
	return b;
	if (b==0)
	return a;
	while (a!=b)
	{
		if (a>b)
		a=a-b;
		if (b>a)
		b=b-a;
	}
	return a;
}