Cod sursa(job #123934)

Utilizator odettesolomon odette odette Data 17 ianuarie 2008 19:16:35
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.3 kb
Raporteaza aceasta sursa 
#include<fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
long n,i,j,nr,x,y;
int main()
{f>>n;
nr=0;
 for(i=1;i<=n;i++)
  for(j=1;j<=n;j++)
    {x=i;y=j;
     while(x!=y)
       if(x>y)
	x=x-y;
	else
	 y=y-x;
     if(x==1)
       nr++;}
g<<nr;
f.close();
g.close();
return 0;}