如何给数组赋初值，若若的问

Question

差不多，只是delphi中用的是‘（）’

Answer 1

eg:type
Tzigzag = record
  x :integer ;
  y :Integer ;
end ;var
  zigzag :Array[1..2] of Tzigzag = ((x:0;y:0),(x:1;y:0)) ;

Answer 2

来晚了啊，同意liujc(阿聪) 的

Answer 3

我在方括号里面用，可是编译报incompatible type:integer and set,还有这个数组可以在子程序里申明吗，是不是一定要用全局变量。
 Zigzag:array[0..63] of TZigzag=
  [  [0,0],
     [0,1],[1,0],
     [2,0],[1,1],[0,2],
     [0,3],[1,2],[2,1],[3,0],
     [4,0],[3,1],[2,2],[1,3],[0,4],
     [0,5],[1,4],[2,3],[3,2],[4,1],[5,0],
     [6,0],[5,1],[4,2],[3,3],[2,4],[1,5],[0,6],
     [0,7],[1,6],[2,5],[3,4],[4,3],[5,2],[6,1],[7,0],
     [7,1],[6,2],[5,3],[4,4],[3,5],[2,6],[1,7],
     [2,7],[3,6],[4,5],[5,4],[6,3],[7,2],
     [7,3],[6,4],[5,5],[4,6],[3,7],
     [4,7],[5,6],[6,5],[7,4],
     [7,5],[6,6],[5,7],
     [6,7],[7,6],
     [7,7]
     ];