Cod sursa(job #122689)

Utilizator cos_min_max_ionCosmin Ion cos_min_max_ion Data 13 ianuarie 2008 14:28:34
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<iostream.h>
#include<stdio.h>
int main()
{ long long p, n, c, q, r, cp, cq;
  freopen("fractii.in", "rt", stdin);
  freopen("fractii.out", "wt", stdout);
  cin>>n; c=2*n-1;
  for(p=2;p<=n;p++)
   for(q=p+1;q<=n;q++)
   {cp=p; cq=q;
    while(r=cp%cq)
     { cp=cq;
       cq=r;
     }
    if(cq==1) c+=2;
   }
  cout<<c<<endl;
  return 0;
}