Cod sursa(job #366640)

Utilizator remus_maziluRemus Mazilu remus_mazilu Data 22 noiembrie 2009 10:06:52
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
#include<iostream.h>
#include<fstream.h>
fstream in("fractii.in",ios::in), out("fractii.out",ios::out);
long cmmdc(long a, long b)
{ while (a!=b)
	if(a>b) a=a-b;
	else b=b-a;
return a;
}
main()
{
long n,i,j,x=0,y;
in>>n;
for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
	{ y=cmmdc(i,j);
	if (y==1) x++;
	}
out<<x;
}