Cod sursa(job #4829)

Utilizator fogabFodor Gabor fogab Data 7 ianuarie 2007 23:56:05
Problema Sum Scor 70
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#define k 100000

#include "stdio.h"

FILE *f, *f2;
unsigned long long int a[k];
long int  n,x,i,j;

int main()
{
	int i;
	for(i=2;i<=k;i++) a[i] = i;
	for(i=2;i<=k;i++)
	{
		if (a[i] == i)
		{
			a[i] = i-1;
			for (j=2;j*i<=k;j++)
			      a[i*j]=a[i*j]-a[i*j]/i;
		}
	}
	f = fopen("sum.in","r");
	fscanf(f, "%ld\n", &n);
	f2 = fopen("sum.out","w");
	for(i=1;i<=n;i++)
	{
		fscanf(f, "%d\n", &x);
		fprintf(f2, "%ld\n", a[x]*x*2);
	}
	fclose(f);
	fclose(f2);
        return 0;  
}