A384404 Consecutive states of the linear congruential pseudo-random number generator for Turbo Pascal when started at 1.

1, 134775814, 3698175007, 870078620, 1172187917, 2884733762, 1368768587, 694906232, 1598751577, 1828254910, 352239543, 2039224980, 303092965, 3611442298, 256513635, 1259699184, 3939707825, 1580146294, 3327160399, 1408429452, 2996491197, 3625686706, 3083712891

Offset: 1

Author

Sean A. Irvine, May 30 2025

Keywords

• nonn
• easy

Comments

Periodic with period 2^32.

Also used by Borland Delphi and Virtual Pascal.

Links

• Sean A. Irvine, Table of n, a(n) for n = 1..10000
• Wikipedia, Linear congruential generator
• Index entries for sequences related to pseudo-random numbers.

Crossrefs

Cf. A152960, A383940, A384126, A384150, A384194, A384236, A384339, A384429, A384432.

Programs

Maple

a:= proc(n) option remember; `if`(n=1, 1,
      irem(134775813*a(n-1)+1, 2^32))
    end:
seq(a(n), n=1..23);  # Alois P. Heinz, May 30 2025

Mathematica

NestList[Mod[134775813*# + 1, 2^32] &, 1, 50] (* Paolo Xausa, Jun 04 2025 *)

Formula

a(n) = (134775813 * a(n-1) + 1) mod 2^32.