Cod sursa(job #377402)

Utilizator bghimisFMI Ghimis Bogdan bghimis Data 24 decembrie 2009 13:55:02
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<iostream>
#include<fstream>
using namespace std;
int cmmdc(int a,int b)
{
	int r=a%b;
	do
	{
		r=a%b;
		a=b;		
		b=r;
	}while(r);
	return a;
}
int main()
{
	int a,i,j,g=0;
	fstream f("functii.in",ios::in);
	fstream x("functii.out",ios::out);
	f>>a;
	for(i=1;i<=a;i++)
		for(j=1;j<=a;j++)
			if(cmmdc(i,j)==1)
				g++;
	x<<g;
}