Cod sursa(job #397930)

Utilizator meandyou01George Tudor meandyou01 Data 17 februarie 2010 18:48:48
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<fstream.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long n,i,s,j,i1,j1,r;
int main()
{fin>>n;s=n+n-1;
   for(i=2;i<=n-1;i++)
      for(j=i+1;j<=n;j++)
       if(j%i!=0 && i%2!=0 && j%2!=0)
      {
	i1=i;j1=j;r=i1%j1;
	while(r)
	{i1=j1;
	 j1=r;
	 r=i1%j1;
	}
	if(j1==1)s+=2;

      }
fout<<s;
fin.close();
fout.close(); 
return 0;
}