Pseudo-random numbers/Middle-square method: Difference between revisions
Content added Content deleted
(→bc: add) |
Drkameleon (talk | contribs) (added Arturo) |
||
| Line 346: | Line 346: | ||
432883 |
432883 |
||
</pre> |
</pre> |
||
=={{header|Arturo}}== |
|||
<syntaxhighlight lang="arturo">seed: 675248 |
|||
rand: function => [ |
|||
let 'seed <= ((seed^2) / 1000) % 1000000 |
|||
] |
|||
do.times: 5 -> print rand</syntaxhighlight> |
|||
{{out}} |
|||
<pre>959861 |
|||
333139 |
|||
981593 |
|||
524817 |
|||
432883</pre> |
|||
=={{header|AWK}}== |
=={{header|AWK}}== |
||
<syntaxhighlight lang="awk"> |
<syntaxhighlight lang="awk"> |
||