Cod sursa(job #711163)
Utilizator | Data | 11 martie 2012 15:07:00 | |
---|---|---|---|
Problema | Fractii | Scor | 0 |
Compilator | c | Status | done |
Runda | Arhiva de probleme | Marime | 0.44 kb |
#include <stdio.h>
int a[1000000];
long functie(int n,int a[1000000])
{
int i,j;
long long k;
k=2;
for (i=2;i<=n;i++)
a[i]=i;
for (i=2;i<=n;i++)
{
if(a[i]==i){
for(j=i;j<=n;j+=i){
a[j]/=i;
a[j]*=(i-1);
}
k=k+2*a[i];
}
}
return k-1;
}
int main()
{
int n;
scanf("%d",&n);
freopen("fractii.in","r",stdin);
freopen("fractii.out","w",stdout);
printf("%lld",functie(n,a));
return 0;
}