Cod sursa(job #48376)

Utilizator razyelxrazyelx razyelx Data 4 aprilie 2007 18:41:15
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include <stdio.h>
#include <string.h>
#include <math.h>
int main(){
	long n,i,s=1,j,k,phi,nr;
	FILE*f=fopen("fractii.in", "r");
	FILE*g=fopen("fractii.out", "w");
	fscanf(f,"%lld",&n);
	for(i=2;i<=n;i++){
		nr=i;phi=nr;
		for(j=2;j<=sqrt(nr);j++){
			if(nr%j==0)
				phi=(phi*(j-1))/j;
			while(nr%j==0)
				nr/=j;
		}
		if(nr>1)
			phi=(phi*(nr-1))/nr;
                s=s+2*phi;

	}
	fprintf(g,"%ld",s);
	fclose(f);
	fclose(g);
	return 0;

}