Cod sursa(job #412722)

Utilizator ionut.smartboyIonut Informaticianul ionut.smartboy Data 5 martie 2010 21:57:49
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<stdio.h>
FILE *in=fopen("fractii.in","r");
FILE *out=fopen("fractii.out","w");
long int n,i,j,a,b,r,nr;
int main()
{
	fscanf(in,"%ld",&n);
	nr=n*2;
	for(i=2;i<=n;i++)
	{
		for(j=2;j<=n;j++)
		{
			a=i;b=j;
			while(b!=0)
			{
				r=a%b;
				a=b;
				b=r;
			}
			if(a==1) nr++;
		}
	}
fprintf(out,"%ld",nr-1);
}