Cod sursa(job #218704)

Utilizator devianceAnusca Andrei deviance Data 3 noiembrie 2008 09:41:42
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.3 kb
#include <fstream.h>
int main()
{ int nrf,i,j,x,y,n,r;
 ifstream f("fractii.in");
 ofstream g("fractii.out");
 f>>n;
 nrf=1;
 for (i=1;i<=n;i++)
  for (j=i+1;j<=n;j++)
  {
  x=i;
  y=j;
   do {
    r=x%y;
    x=y;
    y=r;}
    while (r!=0);
    if (x==1) nrf=nrf+2;
    }
    g<<nrf;
 }