在Delphi中,二维数组的声明和使用非常简单。以下是一个示例:
var
myArray: array of array of Integer;
i, j: Integer;
begin
// 分配二维数组的内存空间
SetLength(myArray, 3, 4);
// 给二维数组赋值
for i := 0 to 2 do
begin
for j := 0 to 3 do
begin
myArray[i, j] := i + j;
end;
end;
// 访问二维数组的值
for i := 0 to 2 do
begin
for j := 0 to 3 do
begin
Write(myArray[i, j], ' ');
end;
Writeln;
end;
end.
这个示例声明了一个名为myArray
的二维数组,大小为3行4列。然后,使用嵌套的for
循环给数组赋值,并使用嵌套的for
循环访问数组的值,并将其输出到控制台。
输出结果如下:
0 1 2 3
1 2 3 4
2 3 4 5