简单问题：二维数组赋初值的语法格式是什么？

Question

查了图书馆所有PASCAL的书都没找到。C语言的书几乎每本书上都有，为什么PASCAL不讲这一点？
例如一个3*3的矩阵（1，2，3；4，5，6；7，8，9）赋值给数组A[3][3]，DELPHI帮助文件里面只有一维数组。

Answer 1

var
  i,j,k:Integer;
  a:Array[1..3]of Array [1..3] of Integer;
begin
  k:=0;
  for i:=1 to 3 do
    for j:=1 to 3 do
    begin
      Inc(k);
      a[i][j]:=k;
    end;
end;

Answer 2

type
  TMyArray = array[0..2, 0..2] of Integer;
const MyArray: TMyArray = ((1, 2, 3),
                           (4, 5, 6),
                           (7, 8, 9));

Answer 3

const Matrix:array[1..3] of Array[1..3] of Integer=((1,2,3),(4,5,6),(7,8,9));

Answer 4

const a:array [1..3,1..3] of integer = ((1,2,3),(4,5,6),(7,8,9));
记住局部变量不能这样赋值。