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

Content added Content deleted
(→‎dc: add)
Line 495: Line 495:
432883
432883
</pre>
</pre>

=={{header|dc}}==
<syntaxhighlight lang="dc">675248 5 sn
[d * 1000 / 1000000 %] sr
[lr x p ln 1 - d sn 0 <l] d sl x</syntaxhighlight>
{{out}}
<pre>959861
333139
981593
524817
432883</pre>


=={{header|EasyLang}}==
=={{header|EasyLang}}==