Cod sursa(job #552924)

Utilizator CLEMENTINAMihaela Clementina Badea CLEMENTINA Data 13 martie 2011 10:35:17
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<fstream>
using namespace std;
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long n,a,b,sa,sb,r,nr=1;
int main()
{
	fin>>n;
	for(a=1;a<n;a++)
		for(b=a+1;b<=n;b++)
		{
			sa=a;
			sb=b;
			while(sb)
			{
				r=sa%sb;
				sa=sb;
				sb=r;
			}
			if (sa==1)
				nr+=2;
		}
	fout<<nr<<"\n";
	fin.close();
	fout.close();
	return 0;
}