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

→‎J: shorter and faster
(→‎J: shorter and faster)
Line 819:
 
=={{header|J}}==
<syntaxhighlight lang="j">(_6 {. _3 }. ])&.:(10&#.^:_1)@(*~) ^: (>: i. 6) 675248</syntaxhighlight>
Or, shorter & faster:
<syntaxhighlight lang="j">}. (1e6 1e3 {.@#: *:)^:(< 7) 675248</syntaxhighlight>
{{out}}
<pre>959861 333139 981593 524817 432883 387691</pre>
559

edits