Cod sursa(job #21687)

Utilizator k_ounu_eddyIacob Eduard k_ounu_eddy Data 23 februarie 2007 23:52:43
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.77 kb
#include<iostream>
#include<memory.h>
using namespace std;
bool NumerePrime[1000000];

inline bool divizibilitate(long long nr,long long divizor)
{
if(nr%divizor==0)
  return 1;
else return 0;
}

int main()
{
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long long N,rezultat=0;
fin>>N;
memset(NumerePrime,1,sizeof(NumerePrime));

for(long long i=2;i*i<=N;i++)
  if(NumerePrime[i])
    {
    long long j=2;
    while(i*j<=N)
      {
      NumerePrime[i*j]=0;
      j++;
      }
    }
    
for(long long a=2;a<=N;a++)
  {
  long long aux=a;
  for(long long cnt=2;cnt<=a;cnt++)
  if(NumerePrime[cnt])
    if(divizibilitate(a,cnt))
      aux=(aux*(cnt-1))/cnt;
  rezultat+=aux;
  }

rezultat*=2;rezultat++;
fout<<rezultat;
return 0;
}