Cod sursa(job #293549)

Utilizator skatesZaharescu Dragos skates Data 1 aprilie 2009 21:47:58
Problema Fractii Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include<iostream.h>  
#include<fstream.h>  
#define DMAX 1000000  

long w[DMAX+1];  
long long n,i,s=1,j;  
ifstream f("fractii.in");  
ofstream g("fractii.out");  

int main()  
{f>>n;  
 for(i=1; i<=n; i++) w[i]=i-1;  
 for(i=2; i<=n; i++)  
  for(j=2*i; j<=n; j+=i) w[j]-=w[i];  
 for(i=1; i<=n; i++)  
  s+=2*w[i];  
 g<<s<<'\n';  
 f.close(); g.close();  
 return 0;  
}