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

added Arturo
(→‎bc: add)
(added Arturo)
Line 346:
432883
</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}}==
<syntaxhighlight lang="awk">
1,532

edits