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

(→‎dc: add)
(→‎bc: add)
Line 374:
5: 432883
</pre>
 
=={{header|bc}}==
<syntaxhighlight lang="bc">s = 675248
define r() {
s = s * s / 1000 % 1000000
return(s)
}
 
for (i = 0; i != 5; ++i) r()</syntaxhighlight>
{{out}}
<pre>959861
333139
981593
524817
432883</pre>
 
=={{header|C}}==
Line 389 ⟶ 404:
}</syntaxhighlight>
{{out}}
<pre>959861
333139
981593
524817
432883</pre>
 
=={{header|C++}}==
559

edits