Cod sursa(job #57859)

Utilizator bontacBoanta Catalin bontac Data 3 mai 2007 11:38:40
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include<fstream.h>


int n,c,i,j,x,y,r;

int main()
{  ifstream fin("fractii.in");
   ofstream fout("fractii.out");
   fin>>n;
   c=0;
   for(i=2;i<=n;i++)
   {		for(j=1;j<i;j++)
		{ x=i;
		  y=j;
		  while(x%y)
		 { r=x%y;
			x=y
		  y=r
			
		  if(y==1) c++;
		}
		  j=i;
		  x=i;
		  y=j;
		   while(x%y)
		 { r=x%y;
			x=y
		  y=r
			
		  if(y==1) c++;
    }

   
   

   fout<<2*c+1;
   fin.close();
   fout.close();
   return 0;
}