Cod sursa(job #51424)

Utilizator Snavenportnespecificat Snavenport Data 12 aprilie 2007 13:55:19
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include <fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
int main()
{
  long k=0,a,b,c,i,j,n;
  f>>n;
  f.close();
  for (i=1;i<=n;i++)
   {
    c=i;
    for (j=1;j<=n;j++)
      {
       b=j;
       a=c;
       while (a!=b)
	 if (a>b)
	   a=a-b;
	 else
	   b=b-a;
       if (a==1)
	k++;
      }
   }
   g<<k;
   g.close();
   return 0;
}