Cod sursa(job #209989)

Utilizator Daniel0001Muntaenu Daniel Daniel0001 Data 25 septembrie 2008 21:52:14
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
long n,i,j,nr;
long cmmdc(long a,long b)
{while(a!=b)
  if(a>b) a=a-b;
   else b=b-a;
 return a;
}
int main()
{f>>n;
 for(i=1;i<=n;i++)
   {for(j=1;j<=n;j++)
      if(cmmdc(i,j)==1) nr++;
   };
 g<<nr;
 f.close();
 g.close();
 return 0;
}