Cod sursa(job #790484)

Utilizator bossulaprogrameAnghel Mihai bossulaprograme Data 21 septembrie 2012 16:15:48
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include<iostream>
#include<fstream>
using namespace std;
long i,n,nr,j;
int cmmdc(int a,int b)
{
	while(a!=b)
		if(a<b)
			b-=a;
		else
			a-=b;
	return a;
	
}

int main()
{
	ifstream cit("fractii.in");
	ofstream afis("fractii.out");
	
	cit>>n;
	if(n==1)
		afis<<"1";
	else
	{
		nr=n;
		for(i=2;i<=n;i++)
			for(j=1;j<=n;j++)
				if(i!=j)
					if(cmmdc(i,j)==1)
						nr++;
		afis<<nr;
	}
		return 0;
}