Cod sursa(job #568818)

Utilizator paunmatei7FMI Paun Matei paunmatei7 Data 31 martie 2011 18:42:48
Problema Fractii Scor 70
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<stdio.h>
#include<math.h>
long ciur(long n)
{
	long e=0,d=2,phi=n,lim;
	lim=sqrt(n);
	while (d<=lim&&n>1)
	{
		e=0;
		while (n%d==0)
		{
			e++;
			n=n/d;
		}
		if (e)
			phi=phi/d*(d-1);
		d++;
	}
	if (n>1)
		phi=phi/n*(n-1);
	return phi;
}
int main()
{
	long n,i;
	long long s=0;
	freopen("fractii.in","r",stdin);
	freopen("fractii.out","w",stdout);
	scanf("%ld",&n);
	for (i=2;i<=n;i++)
		s=s+ciur(i);
	printf("%lld",s*2+1);
}