Cod sursa(job #57857)

Utilizator bontacBoanta Catalin bontac Data 3 mai 2007 11:29:43
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include<fstream.h>
#include<math.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)
		  if(x>y)
			x-=y;
		  else
			y-=x;
		  if(y==1) c++;
		}
		  j=i;
		  x=i;
		  y=j;
		  while(x!=y)
		  if(x>y)
			x-=y;
		  else
			y-=x;
		  if(y==1) c++;
    }

   
   

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