Cod sursa(job #4842)

Utilizator fogabFodor Gabor fogab Data 8 ianuarie 2007 12:35:31
Problema Sum Scor 70
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.42 kb
#define k 100000
#include <stdio.h>
int main(){
unsigned long int a[k+1];
long i,j,n;
FILE *f,*f2;
f=fopen("sum.in","r");
f2=fopen("sum.out","w");
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;i*j<=k;j++) a[i*j]-=a[i*j]/i;
				  }
fscanf(f,"%ld",&n);
for (i=1;i<=n;i++) {
					fscanf(f,"%ld",&j);
					fprintf(f2,"%ld\n",a[j]*j*2);
					}
fclose(f);
fclose(f2);
}