Pseudo-random numbers/Middle-square method: Difference between revisions

Content added Content deleted
Line 266: Line 266:


algoritmo
algoritmo
s=675248, i=5
s=675248, i=4
rareti( i--, #( int(s ^2 / 1000 % 1000000) ) \
rareti( i--, #( int(s ^2 / 1000 % 1000000) ) \
---copiar en 's'---, NL, imprimir )
---copiar en 's'---, NL, imprimir )