login
A384339
Consecutive states of the linear congruential pseudo-random number generator for Berkeley Pascal 3.1 when started at 1.
2
1, 113280614, 518180871, 401789364, 123511293, 522841650, 132082531, 254284640, 306822585, 36791486, 267986559, 195744204, 63672117, 39581194, 434609499, 223082744, 48501361, 535916054, 463875063, 53294308, 487523181, 390617314, 240119379, 401404304, 176021033
OFFSET
1,2
COMMENTS
Periodic with period 2^29.
The default initial seed is 7774755, but 1 is used here for consistency with other OEIS sequences.
LINKS
William N. Joy, Susan L. Graham, Charles B. Haley, Marshall Kirk McKusick, and Peter B. Kessler, Berkeley Pascal's User Manual, Version 3.1, April 1986.
FORMULA
a(n) = (62605 * a(n-1) + 113218009) mod 2^29.
MATHEMATICA
NestList[Mod[62605*# + 113218009, 2^29] &, 1, 50] (* Paolo Xausa, May 27 2025 *)
CROSSREFS
Cf. A383940, A384150, A384194, A384236 (other Pascal generators).
Sequence in context: A186552 A147581 A378059 * A281448 A171571 A208491
KEYWORD
nonn,easy
AUTHOR
Sean A. Irvine, May 26 2025
STATUS
approved