Cod sursa(job #286788)

Utilizator APMeMangra Alex APMe Data 24 martie 2009 10:15:22
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.4 kb
#include<fstream.h>
main()
{long n,k,j,cont=0,auxk,auxj,c;
 ifstream i("fractii.in");
 ofstream o("fractii.out");
 i>>n;cont=2*n-1;
 for(k=2;k<=n;k++)
  {auxk=k;
   for(j=2;j<=n;j++)
    {auxj=j;
     do
      {c=k%j;
       k=j;
       j=c;
      }while(c!=0);
     if(k==1)
      cont++;
     j=auxj;
     k=auxk;
    }
  }
 o<<cont<<'\n';
 i.close();
 o.close();
 return 0;
}