considerare la successione che parte da 50100 e ad ogni numero $x$ fa succedere il numero 1-2*(parte decimale di 1/x) + 1/x. Prendere 100000 numeri della successione e guardare quanti sono quelli compresi tra 0 e 1, quanti tra 1 e 2, quanti tra 2 e 3 e quanti tra 3 e 4
Io ho provato in questo modo:
- Codice:
f:=x->1-2*(1/x-trunc(1/x))+1/x;
x:=50100;
k:=0 : a:=0 : b:=0 : c:=0 : d:=0 : while k<100000 do x:=f(x): k:=k+1 : if(x>0 and x<1) then(a=a+1) elif (x>1 and x<2) then(b=b+1) elif(x<2 and x>3) then(c=c+1) elif (x>3 and x<4) then (d=d+1) end if : end do: printf("%d %d %d %d", a,b,c,d):
Però purtroppo mi stampa sempre i valori 0,0,0,0.
Qualcuno vede cosa c'è che non va e come posso sistemare? (O la mia idea è proprio da buttare via?)