Cod sursa(job #283138)

Utilizator yotherockerPuia Tudor yotherocker Data 18 martie 2009 19:50:15
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include<fstream.h>

long cmmdc(long a,long b)
{
	long r;
	do
	{
		r=a%b;
		a=b;
		b=r;
	}while(r);
	return a;
}

main()
{
	ifstream In("fractii.in");
	ofstream Out("fractii.out");
	long n,fractii=0,i,j,ok;

	In>>n;
	In.close();

	for(i=1;i<=n;i++)
	{
	  ok=0;
	  for(j=1;j<=n;j++)
	  {
	     if(i==j) ok=1;
	     if(cmmdc(i,j)==1) fractii++;
	     if(ok) j++;
	  }
	}

	Out<<fractii<<'\n';

	Out.close();
	return 0;
}