Cod sursa(job #172466)

Utilizator mihai.ioluMihai Iolu mihai.iolu Data 6 aprilie 2008 15:16:26
Problema Fractii Scor 30
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.71 kb
#include<fstream>

using namespace std;

long a[20];

long nrelem(long n, long a[20], int m)
{
	long s=0;

	for(long i=1;i<(1<<m);i++)
	{
		long p=1,nr=0, t=i, c;
		for(int j=1;j<=m;j++)
		{
			 c=1 & t;
			 t=t>>1;
			 if(c)
				 p=p*a[j];
			 nr+=c;
		}
		if(nr%2==1)
			s+=n/p;
		else
			s-=n/p;
	}
	return n-s;
}

long fracnum(long x, long n)
{
	long d=2;
	int m=0;
	while(x>1)
	{
		if(x%d==0)
		{
			a[++m]=d;
			while(x%d==0)
				x/=d;
		}
		d++;
	}
	return nrelem(n,a,m);
}

int main()
{
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	long n;
	f>>n;
	long long s=0L;
	for(int i=1;i<=n;i++)
		s+=fracnum(i,n);
	g<<s;
	f.close();
	g.close();
	return 0;
}