Cod sursa(job #722221)

Utilizator lostsoulMunteanu Florin lostsoul Data 24 martie 2012 15:56:30
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.28 kb
Raporteaza aceasta sursa 
#include <fstream>
using namespace std;
ifstream in("fractii.in");
ofstream out("fractii.out");
int main()
{int i,y,a,r,b,s=0,n;
in>>n;
for(i=1;i<=n;i++)
	for(y=1;y<=n;y++)
	{a=i;
	b=y;
	r=a%b;
	while(r!=0)
	{a=b;
	b=r;
	r=a%b;
	}
	 if(b==1)
		 s=s+1;
	}
out<<s;
}