Delphi 二次元配列を走査して出力する方法を教えてください

Delphiでは、2つの入れ子にしたforループで2次元配列を走査し、それを出力することができます。

実装例は以下の通りです:

var
  arr: array of array of Integer;
  i, j: Integer;
begin
  // 初始化二维数组
  SetLength(arr, 3, 4);
  for i := 0 to 2 do
    for j := 0 to 3 do
      arr[i][j] := i * 10 + j;

  // 遍历并输出二维数组
  for i := 0 to 2 do
    for j := 0 to 3 do
      Writeln(arr[i][j]);
end.

上記例では、最初に配列arrを2次元として宣言し、3行4列の大きさに設定します。次に、2つのネストしたforループを使用してそれぞれ行と列をループで処理し、arr[i][j]の値をi * 10 + jに設定します。最後に、再び2つのネストしたforループを使用して行と列をループで処理し、Writelnを使用して各要素の値を出力します。