Random 如何在FreePascal中生成介于1和1000000之间的随机数

如何在1到1000000之间的自由Pascal中生成随机数

我使用了一个变量类型，如LongInt、Real、Integer，但始终存在Range错误

但1到33333之间的随机数工作正常

Program Random;

var
  a: ...;

begin

a:=random(1000000);

end.

---

你使用哪个版本的免费Pascal？我在这里对2.6.0和使用LongInt作为a的类型没有问题

---

顺便说一句：你不应该把你的程序命名为随机的，这会导致一个错误（但不是范围错误）。

他可能使用整数，在默认模式下是16位。因此，这个长期的建议是好的。Longint在所有模式下均为32位