Cod sursa(job #20222)

Utilizator Ramona2007Furtuna Ramona Cristina Ramona2007 Data 20 februarie 2007 21:06:01
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.53 kb
#include<stdio.h>

   int main()
{
     long n, i, r, a=1, s=0, d, b, c;

    freopen("fractii.in", "r", stdin);
    freopen("fractii.out", "w", stdout);
scanf("%ld", &n);

 for(a=2;a<=n;a++)
 {  for(i=2;i<=n;i++)
   { b=a;
     c=i;
      while(b!=c)
       {
        if(b>c)
        { r=b%c;
          c=b;
          b=r;
        }

        if(c>b)
        { r=c%b;
          b=c;
          c=r;
        }
       }
         if(c>1)
         s++;

   } }
d=n*n-s;

printf("%ld", d);

return 0;

}