Cod sursa(job #188853)

Utilizator ellaharpilat mihaela ellahar Data 10 mai 2008 10:04:17
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include<fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
int main()
{
int i,S[10000],j,k,r,l;
long int N;
f>>N;
f.close();
for(i=1;i<=N;i++)
      S[i]=N;
for(i=2;i<=N;i++)
	 {
	 j=i;
	 k=1;
	 r=0;
	 while(j<=N)
		 {
		 j=i*k;
		 if(j>i) S[j]=S[j]-1;
		 k++;
		 if(j<=N) r++;
		 }
	   S[i]=S[i]-r;
	   }
l=0;
for(i=1;i<=N;i++)
      {

      l=l+S[i];
      }

g<<l;
g.close();
return 0;

}