Cod sursa(job #11424)

Utilizator ral_17Comis Raluca ral_17 Data 31 ianuarie 2007 18:00:46
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<fstream.h>
int main ()
{
ifstream f("fractii.in");
ofstream g("fractii.out");
int i,n,j,a,b,r,k;
f>>n;
k=0;
for(i=1;i<=n;i++)
{ for(j=1;j<=n;j++)
  {a=i;
  b=j;
  r=a%b;
  while (r!=0)
  { a=b;
    b=r;
    r=a%b;
    }
  if (b==1) k++;
  }
  }
  g<<k;
  f.close();
  g.close();
  return 0;
  }