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

Content added Content deleted
Line 267: Line 267:
algoritmo
algoritmo
s=675248, i=4
s=675248, i=4
rareti( i--, #( int(s ^2 / 1000 % 1000000) ) \
rareti( i, #( int(s ^2 / 1000 % 1000000) ) \
---copiar en 's'---, NL ); entonces imprime
---copiar en 's'---, NL ); entonces imprime
terminar
terminar
</syntaxhighlight>
</syntaxhighlight>