Cod sursa(job #209700)

Utilizator andumMorie Daniel Alexandru andum Data 24 septembrie 2008 11:02:35
Problema Fractii Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
# include <stdio.h>

FILE *f,*g;

long long s;
long v[1000000],n,i,j;

int main()
{

 f=fopen("fractii.in","r");
 g=fopen("fractii.out","w");

 fscanf(f,"%ld", &n);
 for (i=2;i<=n;i++)
	v[i]=i-1;
 for (i=2;i<=n;i++)
  for (j=2;j<=n/i;j++)
	 v[i*j]-=v[i];
 for (i=2;i<=n;i++)
	 s+=v[i];
 fprintf(g,"%lld",s*2+1);
 fclose(f);
 fclose(g);

 return 0;

}