Cod sursa(job #12249)

Utilizator Ady.hAdrian Hada Ady.h Data 3 februarie 2007 12:57:47
Problema Fractii Scor 0
Compilator c Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <stdio.h>
#include <math.h>

int vec[20],n;

int prim(int x)
{if ((x==2)||(x==3)) return 1;
else{
int i,t=1;
for (i=2;i<=sqrt(x);i++)
		if (x%i==0) t=0;
return t;
}
}

int totent(int x)
{
int i,fi;
fi=x;
for (i=2;i<=n/2;i++)
	if (n%i==0)
		if (prim(i)) fi=fi*(i-1)/i;
return fi;  
}

int main()
{
unsigned long long numar;
int i;
FILE *pf;
pf=fopen("fractii.in","r");
fscanf(pf,"%d",&n);
fclose(pf);
numar=(unsigned long long)(2*n-1);
for (i=2;i<n;i++)
	numar+=(unsigned long long)totent(n);
return 0;
}