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

m
→‎{{header|Wren}}: Changed to Wren S/H
(Added solution for EDSAC)
m (→‎{{header|Wren}}: Changed to Wren S/H)
 
(2 intermediate revisions by one other user not shown)
Line 603:
524817
432883</pre>
 
=={{header|BQN}}==
<syntaxhighlight lang="bqn">1e6 |⟜(⌊∘÷⟜1e3 ט)⍟(1+↕5) 675248</syntaxhighlight>
Or:
<syntaxhighlight lang="bqn">675248 (1e6 | ט⊸(⌊÷))` 5 ⥊ 1e3</syntaxhighlight>
{{out}}
<pre>⟨ 959861 333139 981593 524817 432883 ⟩</pre>
 
=={{header|C}}==
Line 1,479 ⟶ 1,486:
 
=={{header|Wren}}==
<syntaxhighlight lang="ecmascriptwren">var random = Fn.new { |seed| ((seed * seed)/1e3).floor % 1e6 }
 
var seed = 675248
9,476

edits