Cod sursa(job #1812985)

Utilizator andreigasparoviciAndrei Gasparovici andreigasparovici Data 22 noiembrie 2016 16:49:57
Problema Pascal Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include <iostream>
#include <cstdio>
using namespace std;
long long int n,p=1;
int a[1000001];

int main()
{
    freopen("fractii.in","r",stdin);
    freopen("fractii.out","w",stdout);
    scanf("%lld",&n);

    for(int i=1;i<=n;i++)
        a[i]=i-1;
    for(int i=2;i<=n;i++)
        for(int j=i+i;j<=n;j+=i)
            a[j]-=a[i];
    for(int i=1;i<=n;i++)
        p+=2*a[i];

    printf("%lld",p);
    return 0;
}