Cod sursa(job #334665)

Utilizator vrvpcppveigang radulescu vlad petru vrvpcpp Data 27 iulie 2009 16:17:05
Problema Fractii Scor 30
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include <stdio.h>
FILE *f,*g;
long x,i,n,s,a[1000000];
int main(){
 f=fopen("fractii.in","r");
 g=fopen("fractii.out","w");
 fscanf(f,"%ld",&n);
 for (i=1;i<=n;i++)
 	a[i]=i-1;
 s=0;
 for (i=2;i<=n;i++){
  x=i*2;
  while (x<=n){
   a[x]=a[x]-a[i];
   x=x+i;
  }
  s+=a[i];
 }
 s=s*2+1;
 fprintf(g,"%ld",s);
 fclose(f);
 fclose(g);   
 return 0;   
}