Pagini recente » Statistici Radu Dolea (LuxOcculta) | Diferente pentru utilizator/stargold2 intre reviziile 273 si 274 | Istoria paginii runda/lasm_baraj1_cl10/clasament | Diferente pentru home intre reviziile 471 si 472 | Cod sursa (job #192956)
Cod sursa(job #192956)
# include <stdio.h>
long int i,j,n,s,a[1000010];
int main ()
{
freopen ("fractii.in","r",stdin);
freopen ("fractii.out","w",stdout);
scanf ("%li",&n);
for (i=0;i<=n;i++)
a[i]=i-1;
for (i=2;i<=n;i++)
for (j=i*2;j<=n;j=j+i)
a[j]=a[j]-a[i];
for (i=1;i<=n;i++)
s=s+a[i];
printf ("%li",2*s+1);
return 0;
}