Cod sursa(job #107440)

Utilizator rethosPaicu Alexandru rethos Data 19 noiembrie 2007 20:42:22
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#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=i+1;j<=n;j++)
		if (cmmdc(i,j)==1) nr=nr+2;
  nr++;
  ofstream g("fractii.out");
  g<<nr;
  g.close();
  return 0;
}