Cod sursa(job #347137)

Utilizator mirceadinoMircea Popoveniuc mirceadino Data 11 septembrie 2009 10:08:23
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include<fstream.h>
int cmmdc(int a,int b)
{
	int r;
	if(a<b) {a=a+b; b=a-b; a=a-b;}
	while(r!=0)
	{
		r=a%b;
		a=b; b=r;	
	}
	return a;
}
int main()
{
	int p=0,n,i,j,x,y;

ifstream f1("fractii.in");
ofstream f2("fractii.out");
f1>>n;
for(i=1;i<=n;i++)
	for(j=1;j<=n;j++) 
	{
		x=i; y=j;
		if(cmmdc(x,y)==1) p++;
	}
f2<<p;
f1.close();
f2.close();
return 0;
}