Cod sursa(job #4793)

Utilizator fogabFodor Gabor fogab Data 7 ianuarie 2007 12:20:13
Problema Sum Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.49 kb
#define k 100000

#include "stdio.h"

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