Cod sursa(job #279680)

Utilizator matwowapoMatei Apolzan matwowapo Data 12 martie 2009 22:08:20
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<stdio.h>
int main ()
{
long r,cnt,n,ci,i,ci2,i2;
freopen("fractii.in","r",stdin);
freopen("fractii.out","w",stdout);
scanf("%ld",&n);
cnt=0;
for (i=1;i<=n;i++)
	for (i2=1;i2<=n;i2++)
	{
	ci=i;
	ci2=i2;
	while (ci2!=0)
	{
		r=ci%ci2;
		ci=ci2;
		ci2=r;
	}
	if (ci==1)
	cnt++;
	}
printf("%ld",cnt);
return 0;
}