Cod sursa(job #41012)

Utilizator BMCBou Marian Catalin BMC Data 27 martie 2007 21:39:46
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.29 kb
Raporteaza aceasta sursa 
//BMC
#include<fstream.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");

long Nrdiv(int nr)
{ long i,k=0;
  for(i=2;i<nr;i++)if(nr%i==0)k++;
  return k;
}

int main()
{ long i,n,t;
  fin>>n;
  t=n;
  for(i=2;i<=n;i++)
   t+=n-2*Nrdiv(i)-1;
  fout<<t<<'\n';
return 0;}