Cod sursa(job #905492)

Utilizator fred1fred fred fred1 Data 5 martie 2013 21:21:08
Problema Fractii Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
using namespace std;
#include<fstream>
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long long v[1000001],S=0;
int main()
{
    int i,n,j;
    fin>>n;
    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);
        }
    }
    for(i=2;i<=n;i++)
        S=S+v[i];
    fout<<2*S+1;
    return 0;
}