如何在FreePascal中生成50个随机数列表（0到100之间）

Question

有人可以帮助我在FreePascal中生成50个随机数列表（0到100之间）吗？

Answer 1

假设你想有一个50个整数的数组，你可以使用下面的代码。首先使用Randomize程序初始化随机数发生器。然后它从低索引到高索引迭代阵列（相反，您也可以使用常量范围for I := 0 to 49 to），并通过使用Random函数为该阵列的每个元素生成0到100范围内的随机数。 Random函数返回一个大于或等于0的随机数并且小于此函数所需的唯一参数：

var 
    I: Integer; 
    IntArray: array[0..49] of Integer; 
begin 
    Randomize; 
    for I := Low(IntArray) to High(IntArray) do 
    IntArray[I] := Random(101); 
    ... 
end;