Cod sursa(job #95397)

Utilizator igorPirnau Igor igor Data 28 octombrie 2007 17:17:12
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.42 kb
#include <fstream.h>

#define nm 1000010
ifstream f("fractii.in");
ofstream g("fractii.out");

char a[nm];
long b[nm],i,n,j;
long long s;

int main()
{
	f>>n;
	f.close();
	for(i=1;i<=n;i++) b[i]=i;
	
	for(i=2;i<=n;i++)
		if(!a[i])
			for(j=i+i;j<=n;j=j+i)
			{
				 a[j]=1;
				 b[j]=b[j]*(i-1)/i;
			}
	
	for(i=2;i<=n;i++) s=s+b[i];
	s=s*2;
	for(i=n;a[i];i--);	
	g<<s-i;
	g.close();
	return 0;
}