Cod sursa(job #264161)

Utilizator Radu_BumbaceaRadu Bumbacea Radu_Bumbacea Data 21 februarie 2009 16:41:32
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include <stdio.h>

int phi(int m)
{
	int s,q;
	q=1;
	for(s=2;s*s<=m;s++)
	{
		if (m%s==0)
		{
			q=q*(s-1);
			m=m/s;
			whlie (m%s==0)
			{
				q=q*s;
				m=m/s;
			}
		}
	}
	if (m!=0) 
		q=q*(m-1);
	return q;
}

int main()
{
	long long int nr;
	int n,k;
	nr=1;
	freopen("fractii.in","r",stdin);
	freopen("fractii.out","w",stdout);
	scanf("%d",n,stdin);
	for (int i=2;i<=n;i++)
		nr=nr+phi(i);		
	nr=nr*2;
	return 0;
}