Cod sursa(job #1357550)

Utilizator mihalut.filipMihalut Filip mihalut.filip Data 23 februarie 2015 23:07:58
Problema Fractii Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include <iostream>
#include <fstream>
using namespace std;
ifstream f("fractii.in");
ofstream g("fractii.out");
long long a[1000001];
int main()
{
    long long i,j,n,s=0;
    f>>n;
    for(i=1;i<=n;i++)
        a[i]=i;
    for(i=2;i<=n;i++)
    {
        if(a[i]==i)
        {
            a[i]=i-1;
            for(j=2*i;j<=n;j+=i)
                a[j]=a[j]*(i-1)/i;
        }
    }
    for(i=1;i<=n;i++)
        s+=a[i];
    g<<2*s-1;
    return 0;
}