$2, \, 6, \, 18, \, 35, \, 58, \, 111, \, 115, \, 127, \, 151, \, 163, \, 191, \, 211, \, 217, \, 241, \, 256, \,...$
Come prosegue?
I termini mostrati sono molti di più di quelli che servono per scoprire la legge di formazione
![Wink :wink:](./images/smilies/icon_wink.gif)
Questo forum è una sezione del PORTALE DI BASE CINQUE
Codice: Seleziona tutto
!musica con i decimali di pigreco
!cliccare su doppia precisione per evitare il blocco
!Premere spazio per terminare
!Consigliato per chi soffre d’insonnia
LET a=FP(PI)
LET a$=right$(STR$(a),999)
DO
FOR m=1 TO 997 STEP 2
LET x=VAL(mid$(a$,m,2))
LET p=5+INT(RND*3)
LET q=4+INT(RND*3)
beep p*x,q*x
CHARACTER INPUT nowait:e$
IF e$=" " THEN EXIT DO
next M
LOOP UNTIL e$ = " "
END