一·動態數組

在一個動態數組類型的情況下，該陣列的初始長度是零。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(false)=0 ord(true)=1
Sqr(x) 求x的平方。 例：sqr(4)=16 Sqrt(x)求x的開方. 例：sqrt(16)=4 round(x) 求x的四舍五入 例：round(4.5)=5 結果是integer型
trunc(x) 求x的整數部分 例：trunc(5.6)=5 結果是integer型
int(x) 求x的整數部分 例int(5.6)=5.0 結果是real型
frac (x)求x的小數部分 例 frac(5.6)=0.6 （在free pascal中想看小數型式的結果，在輸出時應指定場寬）
pred(x) 求x的前導 pred(‘b’)=’a’ pred(5)=4 pred(true)=false succ(x) 求x的后繼 succ(‘b’)=’c’ succ(5)=6 succ(false)=true odd(x) 判斷x是否為奇數。如果是值為true，反之值為false. Odd(2)=false
power(a,n) 求a的n次方 power(2,3)=8 {只有在開啟math庫時才可以使用} random 取0~1之間的隨機數（不能取到1）
randomize 隨機數的種子函數,在每次設置隨機數時都要把這個函數放在最前面.
Fillchar(a,size(a),0) 數組初始化，即把數組a的值全部置為0 {賦成布爾型變量也可以}
SHR: x SHR n 把x換成二進制后向右移n位，相當于 把x 除以 2n
SHL: x SHL n把x換成二進制后向左移n位，相當于 把x 乘以 2n

214
1 連接運算 concat(s1,s2,s3…sn) 相當于s1+s2+s3+…+sn. 例：concat(‘11’,’aa’)=’11aa’;
3 刪除子串。過程 Delete(s,I,l) 從字符串s中刪除第I個字符開始后的長度為l的子串。 例：s:=’abcde’;delete(s,2,3);結果s:=’ae’
5 求字符串長度 length(s) 例：length(‘12abc’)=5
6 搜索子串的位置 pos(s1,s2) 如果s1是s2的子串 ，則返回s1的第一個字符在s2中的位置，若不是子串，則返回0. 例：pos(‘ab’,’12abcd’)=3
7. 字符的大寫轉換。Upcase(ch) 求字符ch的大寫體。 例：upcase(‘a’)=’A’
8 數值轉換為數串。 過程 Str(x,s) 把數值x化為數串s. 例：str(12345,s); 結果s=’12345’
9 數串轉換為數值。 過程val(s,x,I) 把數串s轉化為數值x,如果成功則I=0,不成功則I為無效字符的序數 例：val(‘1234’,x,I);結果 x:=1234 標準函數是Turbo Pascal語言預先定義的，它們實際上是能完成特定功能的稱步子程序的程序段。每個標準函數都用一個標識符來標識，每個標準函數都能完成一個特定的功能，在程序中可以直接調用它們。Turbo Pascal語言中某些標準函數與數學中的函數有相似之處。

總結

以上是生活随笔為你收集整理的Pascal 技巧的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。