Pseudo-random numbers/Middle-square method: Difference between revisions
Content added Content deleted
m (julia example) |
(Added XPL0 example.) |
||
Line 312: | Line 312: | ||
524817 |
524817 |
||
432883 |
432883 |
||
</pre> |
|||
=={{header|XPL0}}== |
|||
<lang XPL0>real Seed; |
|||
func Random; |
|||
[Seed:= Floor(Mod(Seed*Seed/1e3, 1e6)); |
|||
return fix(Seed); |
|||
]; |
|||
int N; |
|||
[Seed:= 675248.; |
|||
for N:= 1 to 5 do |
|||
[IntOut(0, Random); ChOut(0, ^ )]; |
|||
]</lang> |
|||
{{out}} |
|||
<pre> |
|||
959861 333139 981593 524817 432883 |
|||
</pre> |
</pre> |