Cod sursa(job #1143302)

Utilizator PTAdrian64Pop-Tifrea Adrian PTAdrian64 Data 15 martie 2014 14:21:44
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include <cstdio>

using namespace std;
long N,i,j,p,S,a,b,aux,r;
int main()
{freopen("fractii.in","r",stdin);
 freopen("fractii.out","w",stdout);
 scanf("%d",&N);
 fclose(stdin);
 S=0;
 for(i=1;i<=N;i++)
 {p=i;
  for(j=1;j<=N;j++)
    {a=p;
     b=j;
     if(a<b)
     {aux=a;
      a=b;
      b=aux;
     }
     while(b)
     {r=a%b;
      a=b;
      b=r;
     }
     if(a==1)
        S++;
    }
 }
 printf("%d",S);
 fclose(stdout);
    return 0;
}