Pascal 技巧

一·动态数组

在一个动态数组类型的情况下，该阵列的初始长度是零。SetLength函数是标准函数它将分配必要的内存，用于存储数组元素的数组的实际长度必须设置。

声明动态数组
声明动态数组，不需要提数组范围。例如：

type
darray = array of integer;
var
a: darray;
在使用数组之前，你必须声明的大小，使用SetLength函数函数：

setlength(a,100);
阵列有一个有效的数组索引范围从0到999的数组索引总是从0开始。
下面的示例声明并使用一个二维动态数组：

program exDynarray;
var
a: array of array of integer; (* a 2 dimensional array *)
i, j : integer;
begin
setlength(a,5,5);
for i:=0 to 4 do
for j:=0 to 4 do
a[i,j]:= i * j;
for i:=0 to 4 do
begin
for j:= 0 to 4 do
write(a[i,j]:2,’ ‘);
writeln;
end;
end.
上面的代码编译和执行时，它会产生以下结果：

0 0 0 0 0
0 1 2 3 4
0 2 4 6 8
0 3 6 9 12
0 4 8 12 16

2 pascal函数大全
pascal函数 编辑本段一、数学函数：
Inc(i) 使i:=i+1;
dec(i) 使i:=i-1;
Chr(x) 求编号x对应的字符。例：Chr(65)=’A’ chr(97)=’a’
Ord(x) 求字符x对应的编号。例:ord(‘A’)=65 ord(‘a’)=97 另外：ord(f