Cod sursa(job #221608)

Utilizator b0by_ceausuCeausu Bogdan Constantin b0by_ceausu Data 16 noiembrie 2008 22:34:24
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
#include <fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
long n,i,j,nr;
int a[100];
int main ()
{
f>>n;
for (i=1;i<=n;i++)
    a[i]=i;
for (i=2;i<=n;i++)
    if (a[i]==i)
       for (j=i;j<=n;j++)
	  a[j]=a[j]/i*i-1;
nr=1;
for (i=2;i<=n;i++)
    nr=2*a[i]+nr;
g<<nr;
f.close ();
g.close ();
return 0;
}