Cod sursa(job #107438)

Utilizator rethosPaicu Alexandru rethos Data 19 noiembrie 2007 20:33:56
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include <fstream.h>
long long cmmdc(int x,int y)
{ while (x!=y)
	if (x>y) x=x-y;
	else y=y-x;
  return x;
}
int main()
{ long long n,i,j,nr;
  ifstream f("fractii.in");
  f>>n;
  f.close();
  nr=0;
  for (i=1;i<=n;i++)
	for (j=1;j<=n;j++)
		if (cmmdc(i,j)==1) nr++;
  ofstream g("fractii.out");
  g<<nr;
  g.close();
  return 0;
}