Cod sursa(job #192635)

Utilizator ckaty_l1Lupascu Catalina ckaty_l1 Data 31 mai 2008 12:30:10
Problema Fractii Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.57 kb
#include<stdio.h>   
long long n,v[1000001],i,j;
  
int main()     
   {     
       FILE*f=fopen("fractii.in","r");     
       FILE*g=fopen("fractii.out","w");      
       fscanf(f,"%lld",&n);     
       for (i = 1; i <= n; ++i)   
           v[i] = i-1;   
       for (i = 2; i <= n; ++i)   
           for (j = 2*i; j <= n; j = j+i)   
               v[j] -= v[i];   
       long long nr=0;   
       for(i=1;i<=n;i++)   
             nr=nr+v[i];   
       fprintf(g,"%lld",2*nr+1);   
       fclose(f);   
       fclose(g);     
       return 0;   
}