Cod sursa(job #131936)

Utilizator ProcopliucProcopliuc Adrian Procopliuc Data 4 februarie 2008 19:11:40
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
# include <stdio.h>
int cmmdc (long x,long y)
{
while (x!=y)
{
if (x>y)
x=x-y;
else
y=y-x;
if (x==1 || y==1)
return 1;
}
return x;
}
long i,j,n,k;
int main ()
{
freopen ("fractii.in","r",stdin);
freopen ("fractii.out","w",stdout);
scanf ("%ld",&n);
for (i=1;i<=n;i++)
for (j=1;j<=n;j++)
if (cmmdc(i,j)==1)
k++;
printf ("%ld",k);
return 0;
}