Cod sursa(job #372244)

Utilizator Ionut_infoNicoara Ionut Ionut_info Data 9 decembrie 2009 08:57:12
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,nr,a,b,r;
int main()
{
fscanf(in,"%ld",&n);
for(i=1;i<=n;i++)
	for(j=1;j<=n;j++)
		{
		a=i;
		b=j;
		while(a!=b)
			{
			if(a>b) a-=b;
			else b-=a;
			}
		r=a;a=b;
		if(r==1) nr++;
		}
fprintf(out,"%ld",nr);
return 0;
}