Linear congruential generator: Difference between revisions
Content added Content deleted
m (→{{header|R}}) |
Alextretyak (talk | contribs) (Added 11l) |
||
Line 37: | Line 37: | ||
More info is at [[Random number generator (included)#C]]. |
More info is at [[Random number generator (included)#C]]. |
||
<br><br> |
<br><br> |
||
=={{header|11l}}== |
|||
<lang 11l>T LinearCongruentialGenerator |
|||
seed = 0 |
|||
Int a, c, m |
|||
F (a, c, m) |
|||
.a = a |
|||
.c = c |
|||
.m = m |
|||
F ()() |
|||
.seed = (.a * .seed + .c) [&] .m |
|||
R .seed |
|||
V bsd_rnd = LinearCongruentialGenerator(1103515245, 12345, 7FFF'FFFF) |
|||
V ms_rnd = LinearCongruentialGenerator(214013, 2531011, 7FFF'FFFF) |
|||
print(‘BSD RAND:’) |
|||
L 5 |
|||
print(bsd_rnd()) |
|||
print() |
|||
print(‘MS RAND:’) |
|||
L 5 |
|||
print(ms_rnd() >> 16)</lang> |
|||
{{out}} |
|||
<pre> |
|||
BSD RAND: |
|||
12345 |
|||
1406932606 |
|||
654583775 |
|||
1449466924 |
|||
229283573 |
|||
MS RAND: |
|||
38 |
|||
7719 |
|||
21238 |
|||
2437 |
|||
8855 |
|||
</pre> |
|||
=={{header|360 Assembly}}== |
=={{header|360 Assembly}}== |