Cod sursa(job #302029)

Utilizator dannywox969Trial and Error dannywox969 Data 8 aprilie 2009 16:51:50
Problema Fractii Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include <stdio.h>
#define N 1000008

int e[N];
int a;

void euler(int n)
{
	int i,j;
	for(int i=2;i<=n;++i)
		e[i]=i;
	for(i=2;i<=n;++i)
		if(e[i]==i)
			for(j=i;j<=n;j+=i)
				e[j]=e[j]/i*(i-1);
}


int main()
{
	long long s=0;
	freopen("fractii.in","r",stdin);
	freopen("fractii.out","w",stdout);
	euler(N-1);
	scanf("%d",&a);
	for(int i=2;i<=a;++i)
		s+=e[i];
	
	
	
	printf("%lld",2*s+1);
	return 0;
}