Cod sursa(job #410075)

Utilizator razvanbhRotaru Razvan razvanbh Data 4 martie 2010 08:44:30
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include<fstream>
#define Fin "fractii.in"
#define Fout "fractii.out"
using namespace std; 
int n;
long k;

int cmmdc(int x, int y)
{ int r=x%y;
  while(r!=0)
       {
       x=y;
       y=r;
       r=x%y;
       }
  return y;
}

int main(void)
{
int i,j;
ifstream in (Fin);
ofstream out (Fout);
in>>n;
k=0;
k+=n;
for(i=2;i<=n;i+=2)
	for(j=1;j<=n;j+=2)
		if(cmmdc(i,j)==1) k++;
for(i=3;i<=n;i+=2)
	for(j=1;j<=n;j++)
		if(cmmdc(i,j)==1) k++;
out<<k;
out.close();
return 0;
}