Cod sursa(job #648678)

Utilizator geobarosanu1Tutuianu George geobarosanu1 Data 13 decembrie 2011 23:00:18
Problema Fractii Scor 0
Compilator c Status done
Runda Arhiva de probleme Marime 0.43 kb
#include <stdio.h>
int a[1000000];

int calculare(long n,int a[1000000]){
	int nr=0,i,j;

	for (i=2;i<=n;i++)
		a[i]=i;
	a[1]=0;

	for (i=2;i<=n;i++){
		for (j=i;j<=n;j+=i)
			a[j]-=a[j]/i;
		nr+=a[i];
	}


	return 2*nr+1;
}
int main()
{
	FILE* f=fopen("fractii.in","r");
	FILE* g=fopen("fractii.out", "w");
	long n,i,j;

	fscanf(f,"%d", &n);
	fprintf(g,"%d",calculare(n,a));

	fclose(f);
	fclose(g);
	return 0;
}