Cod sursa(job #648705)

Utilizator geobarosanu1Tutuianu George geobarosanu1 Data 14 decembrie 2011 00:19:15
Problema Fractii Scor 90
Compilator c Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <stdio.h>
long long a[1000000];

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

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

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


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

	result=fscanf(f,"%lld", &n);
	fprintf(g,"%lld",calculare(n,a));

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