delphi菜鸟的一个问题

Question

procedure pirint(var a:array[l1..u1:integer] of array [l2..u2] of integer]of real);
begin
end;

Answer 1

不可能对
procedure pirint(var a:array[l1..u1:integer;l2..u2:integer]of real);
begin                                      // 注意了不是 ; 是 ,
end;

Answer 2

对不起，我已经改正了
type kk = array of array of real;
procedure pirint(A: kk);
begin
end;

Answer 3

同意leeyansheng(风妖精)
  type kk = array of array of real;
   procedure pirint(A: kk);
用SETLENGTH()可以设置长度
LOW(),HIGH()来进行循环控制