Cod sursa(job #284642)

Utilizator DraStiKDragos Oprica DraStiK Data 21 martie 2009 21:02:43
Problema Fractii Scor 100
Compilator cpp Status done
Runda petru_toti Marime 0.58 kb
#include<fstream>
using namespace std;
#define INPUTFILE "fractii.in"
#define OUTPUTFILE "fractii.out"
#define DIM 1000001
ifstream fin (INPUTFILE);
ofstream fout (OUTPUTFILE);
long long a[DIM];
int main ()
{
    long long i,j,n,S=0;
    fin>>n;
    for (i=2; i<=n; ++i)
    {
        if (!a[i])
        {
                  S+=i-1;
        for (j=2*i; j<=n; j+=i)
            if(!a[j])
                  a[j]=j-j/i;
            else
                  a[j]-=a[j]/i;
        }
        else
            S+=a[i];   
    }
    S=S*2+1;
    fout<<S;
    return 0;
}