Cod sursa(job #306079)

Utilizator beyond_k7aOnutu Catalin beyond_k7a Data 19 aprilie 2009 17:12:32
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<fstream>
using namespace std;
long n,s,i,j;
long cmmdc(long a, long b)
{
 if(b==0)
  return a;
 return cmmdc(b,a%b);   
}
int main()
{
 ifstream f("fractii.in");
 ofstream g("fractii.out");
 
 f>>n;
 s=1;
 for(i=1;i<=n;i++)
 {
  for(j=1;j<i;j++)
   if(cmmdc(i,j)==1)
    s++;
 }
 g<<2*s-1;
 
 
 
 f.close();
 g.close();
 return 0;   
}