Cod sursa(job #121821)

Utilizator iepuras_binarAlexandru B. iepuras_binar Data 9 ianuarie 2008 21:53:17
Problema Fractii Scor 30
Compilator c Status done
Runda Arhiva de probleme Marime 0.38 kb
#include <stdio.h>
 int phi[1000000],n,sol=1;
 int  phii(int N) {
  int i,j;
for ( i = 1; i <= N; ++i)
    phi[i] = i-1;
for ( i = 2; i <= N; ++i)
    for ( j = 2*i; j <= N; j += i)
        phi[j] -= phi[i];
}

int main() {
int i;
freopen("fractii.in","r",stdin);
freopen("fractii.out","w",stdout);
  scanf("%d",&n);
phii(n);
for (i=2;i<=n;i++)
	sol+=2*phi[i];
printf("%d",sol);
return 0;
 }