Cod sursa(job #53098)

Utilizator BloodRainBurceanu Gabriel BloodRain Data 20 aprilie 2007 22:46:00
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<fstream.h>
int main(void)
{
long n,i,j,a,b,k;
ifstream in("fractii.in");
in>>n;
in.close();
k=2*n-1;
for(i=2;i<=n;i++)
	for(j=2;j<i;j++)
		{
		a=i;
		b=j;
		while(a!=b)
			if(a>b) a-=b;
			else b-=a;

		if(a==1) k+=2;
		}
ofstream out("fractii.out");
out<<k<<'\n';
out.close();
return 0;
}