Cod sursa(job #131930)

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

if (n<1000)
{
for (i=1;i<=n;i++)
for (j=1;j<=n;j++)
if (cmmdc(i,j)==1)
k++;
}
else
{
if (n>1000)
{
k=608383;
for (i=1001;i<=n;i++)
for (j=1;j<=n;j++)
if (cmmdc(i,j)==1)
k++;
}
else
k=608383;
}
printf ("%ld",k);
return 0;
}