Cod sursa(job #250357)

Utilizator 630r63Ilinca George Mihai 630r63 Data 30 ianuarie 2009 18:53:12
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.62 kb
#include<fstream>      
#define N 1000001    
int n,v[N];    
void euler()    
{    
     int i,j;    
     for( i=2 ; i<N ; ++i )    
         v[i]=i;    
     for( i=2 ; i<N ; ++i )    
        if( v[i]==i )    
            for(j=i ; j<N ; j+=i )    
                v[j] = v[j] / i * ( i - 1 ) ;    
}    
void calcul()    
{    
     long long s=1;    
     int i;      
     for( i=2 ; i<=n ; ++i )    
          s+= 2 * v[i];    
     g<<s;   
}    
int main()    
{    
   ifstream f("fractii.in");    
   ofstream g("fractii.out");    
   f>>n;  
   euler();    
   calcul();    
return 0;    
}