Cod sursa(job #30422)

Utilizator Ramona2007Furtuna Ramona Cristina Ramona2007 Data 13 martie 2007 22:31:30
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.51 kb
#include<stdio.h>
    long int cmmdc(long b, long c)
    {
	while(b!=0 && c!=0)
       {
        if(b>c)
	 b=b%c;
        else
         c=c%b;
       }

    return b+c;
    }


   int main()
{
     long int n, i, a, d, b, c;

    freopen("fractii.in", "r", stdin);
    freopen("fractii.out", "w", stdout);
scanf("%ld", &n);
d=n*n;
 for(a=2;a<=n;a++)
 { 
   for(i=2;i<=n;i++)
   { b=a;
     c=i;
  
      if(cmmdc(b,c)>1)
           d--; 
      
   } }


printf("%ld", d);

return 0;

}