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

adding lambdatalk task
(adding lambdatalk task)
Line 675:
432883
</pre>
 
=={{header|Lambdatalk}}==
<syntaxhighlight lang="Scheme">
{def msrandom
{lambda {:s :n}
{if {>= :n 0}
then :s
{msrandom {W.slice 3 -3 {pow :s 2}} {- :n 1}}
else}}}
-> msrandom
 
{msrandom 675248 5}
-> 675248 959861 333139 981593 524817 432883
</syntaxhighlight>
 
=={{header|Nim}}==
99

edits