list - FreePascal で 50 個の乱数 (0 から 100 の間) のリストを生成する方法

Question

FreePascal で 50 個の乱数 (0 から 100 の間) のリストを生成するのを手伝ってくれる人はいますか?

Answer 1

50 個の整数の配列が必要であると仮定すると、次のコードを使用できます。Randomize最初に、プロシージャを使用して乱数ジェネレータを初期化します。次に、配列を低いインデックスから高いインデックスまで反復し (代わりに、定数範囲for I := 0 to 49 toを使用することもできます)、その配列の各要素に対して、関数を使用して 0 から 100 の範囲の乱数を生成しRandomます。この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;