Cod sursa(job #122228)

Utilizator ConsstantinTabacu Raul Consstantin Data 11 ianuarie 2008 15:50:32
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
#include<fstream.h>
int n,i,j,a,b,r,k;
int main()
{
ifstream f("fractii.in");
ofstream g("fractii.out");
f>>n;
k=2*n-1;
if(n%2==0)
	k=k+n/2;
else
	k=k+n/2+1;
for(i=3;i<=n;i++)
for(j=i+1;j<=n;j++)
	{a=i;b=j;r=0;
	if((a%b!=0)||(b%a!=0))
	while(b!=0)
		{r=a%b;
		a=b;b=r;}
	if(a==1)
		k+=2;
	}
g<<k;
f.close();
g.close();
return 0;
}