Cod sursa(job #20960)

Utilizator ZnupiFelix Oghina Znupi Data 22 februarie 2007 18:01:06
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include <fstream.h>

int cmmdc(int a,int b) {
	int r;
	while(b!=0) {
		r=a%b;
		a=b;
		b=r;
	}
	return a;
}
int main() {
	ifstream fin("fractii.in");
	ofstream fout("fractii.out");
	int i, j, n, c=0;
	fin>>n;
	for (i=1; i<=n; i++)
		for (j=1; j<=n; j++)
			if (cmmdc(i, j)==1) c++;
	fout<<c;
	return 0;
}