Cod sursa(job #279283)

Utilizator peteanvPetean Vlad peteanv Data 12 martie 2009 19:13:06
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<fstream.h>           j

long long j,n,i,s=0;
int cmmdc(int a,int b)
{while(a!=b)
{if(a>b)a-=b;
       else b-=a; }
       return a;
}

int main()
{
ifstream f("fractii.in");
ofstream g("fractii.out");
while(f>>n)
{
s=2*n-1;
for(i=2;i<=n;i++)
 {
 for(j=i+1;j<=n;j++)
   if(i%j) if(cmmdc(i,j)==1)s+=2;


}
  g<<s<<"\n";}
return 0;
}