Cod sursa(job #172473)

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

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=1L;
	for(int i=2;i<=n;i++)
		s+=fracnum(i,i);
	g<<2*s-1;
	f.close();
	g.close();
	//cout<<2*s-1<<endl;
	return 0;
}