《第02章ObjectPascal語(yǔ)言基礎(chǔ)》由會(huì)員分享，可在線閱讀，更多相關(guān)《第02章ObjectPascal語(yǔ)言基礎(chǔ)（49頁(yè)珍藏版）》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。

1、 Delphi 程序設(shè)計(jì)程序設(shè)計(jì)主講：陳強(qiáng)主講：陳強(qiáng)南昌理工學(xué)院計(jì)算機(jī)南昌理工學(xué)院計(jì)算機(jī)系系 Delphi 程序設(shè)計(jì)程序設(shè)計(jì)v第1章 Delphi 2005簡(jiǎn)介v第2章 Object Pascal語(yǔ)言基礎(chǔ)v第3章 Windows應(yīng)用程序界面設(shè)計(jì)v第4章 菜單、工具欄和對(duì)話框v第5章 使用復(fù)雜組件v第6章 面向?qū)ο蟮暮诵奶匦詖第7章 多文檔界面設(shè)計(jì)v第8章 程序調(diào)試與異常處理v第9章 文件操作和流v第10章 多媒體應(yīng)用設(shè)計(jì)v第11章 數(shù)據(jù)庫(kù)應(yīng)用設(shè)計(jì)v第12章 綜合應(yīng)用設(shè)計(jì) Delphi 程序設(shè)計(jì)第第2章章 Object Pascal語(yǔ)言基礎(chǔ)語(yǔ)言基礎(chǔ)1.2.1 語(yǔ)言成分語(yǔ)言成分2.2.2 語(yǔ)句與流

2、程控制語(yǔ)句與流程控制3.2.3 定義數(shù)據(jù)類型定義數(shù)據(jù)類型4.2.4 構(gòu)造數(shù)據(jù)類型構(gòu)造數(shù)據(jù)類型5.2.5 過(guò)程和函數(shù)過(guò)程和函數(shù) Delphi 程序設(shè)計(jì)2.1 語(yǔ)言成分語(yǔ)言成分1.2.1.1 程序組成程序組成2.2.1.2 標(biāo)準(zhǔn)數(shù)據(jù)類型標(biāo)準(zhǔn)數(shù)據(jù)類型3.2.1.3 運(yùn)算符與表達(dá)式運(yùn)算符與表達(dá)式4.2.1.4 標(biāo)準(zhǔn)函數(shù)標(biāo)準(zhǔn)函數(shù)5.2.1.5 常量與變量常量與變量 Delphi 程序設(shè)計(jì)2.1.1 程序組成程序組成1.程序結(jié)構(gòu)程序結(jié)構(gòu)【例【例2.1】 顯示程序結(jié)構(gòu)。顯示程序結(jié)構(gòu)。2.詞匯集詞匯集基本字符基本字符保留字保留字指示字指示字標(biāo)識(shí)符標(biāo)識(shí)符分隔符分隔符3.注釋和編譯指令注釋和編譯指令注釋注釋編譯指

3、令編譯指令4.Pascal代碼書寫風(fēng)格代碼書寫風(fēng)格 Delphi 程序設(shè)計(jì)2.1.2 標(biāo)準(zhǔn)數(shù)據(jù)類型標(biāo)準(zhǔn)數(shù)據(jù)類型1.什么是數(shù)據(jù)類型什么是數(shù)據(jù)類型2.數(shù)據(jù)類型的分類數(shù)據(jù)類型的分類簡(jiǎn)單數(shù)據(jù)類型簡(jiǎn)單數(shù)據(jù)類型構(gòu)造數(shù)據(jù)類型構(gòu)造數(shù)據(jù)類型指針類型指針類型 Delphi 程序設(shè)計(jì)2.1.2 標(biāo)準(zhǔn)數(shù)據(jù)類型標(biāo)準(zhǔn)數(shù)據(jù)類型3.整數(shù)類型整數(shù)類型4.實(shí)數(shù)類型實(shí)數(shù)類型5.布爾類型布爾類型6.字符類型字符類型7.字符串類型字符串類型 Delphi 程序設(shè)計(jì)2.1.3 運(yùn)算符與表達(dá)式運(yùn)算符與表達(dá)式1.運(yùn)算符運(yùn)算符算術(shù)運(yùn)算符算術(shù)運(yùn)算符關(guān)系運(yùn)算符關(guān)系運(yùn)算符位運(yùn)算符位運(yùn)算符邏輯運(yùn)算符邏輯運(yùn)算符2.運(yùn)算符的優(yōu)先級(jí)運(yùn)算符的優(yōu)先級(jí) Delp

4、hi 程序設(shè)計(jì)【例【例2.2】 mod運(yùn)算的用法。運(yùn)算的用法。(w + 1) mod 7/明天明天(w 1 + 7 ) mod 7/昨天昨天 Delphi 程序設(shè)計(jì)2.1.3 運(yùn)算符與表達(dá)式運(yùn)算符與表達(dá)式3.表達(dá)式表達(dá)式表達(dá)式及其運(yùn)算規(guī)則表達(dá)式及其運(yùn)算規(guī)則表達(dá)式的數(shù)據(jù)類型表達(dá)式的數(shù)據(jù)類型布爾表達(dá)式中的短路計(jì)算布爾表達(dá)式中的短路計(jì)算書寫表達(dá)式時(shí)的注意事項(xiàng)書寫表達(dá)式時(shí)的注意事項(xiàng) Delphi 程序設(shè)計(jì)【例【例2.3】 使用表達(dá)式。使用表達(dá)式。1.i mod 2=0/取值為取值為true時(shí)，時(shí)，i為一個(gè)偶數(shù)，否則為奇數(shù)為一個(gè)偶數(shù)，否則為奇數(shù)2.(i=0) and (i=9) /判斷判斷i的值是否在的

5、值是否在0到到9之間之間 Delphi 程序設(shè)計(jì)2.1.4 標(biāo)準(zhǔn)函數(shù)標(biāo)準(zhǔn)函數(shù)1.函數(shù)的概念函數(shù)的概念2.常用標(biāo)準(zhǔn)函數(shù)說(shuō)明常用標(biāo)準(zhǔn)函數(shù)說(shuō)明3.調(diào)用標(biāo)準(zhǔn)函數(shù)調(diào)用標(biāo)準(zhǔn)函數(shù)【例【例2.4】 使用標(biāo)準(zhǔn)函數(shù)。使用標(biāo)準(zhǔn)函數(shù)。odd(i) /取值為取值為true時(shí)，時(shí)，i為一個(gè)奇數(shù)，否則為偶數(shù)為一個(gè)奇數(shù)，否則為偶數(shù)chr(ord(ch)+ord(a)-ord(A) /將將ch轉(zhuǎn)換成小寫字母轉(zhuǎn)換成小寫字母 Delphi 程序設(shè)計(jì)2.1.5 常量與變量常量與變量1.常量常量直接常量和符號(hào)常量直接常量和符號(hào)常量常量定義常量定義2.變量變量變量聲明變量聲明變量初始化變量初始化變量參與的運(yùn)算變量參與的運(yùn)算 Delphi

6、 程序設(shè)計(jì)2.2 語(yǔ)句與流程控制語(yǔ)句與流程控制1.2.2.1 簡(jiǎn)單語(yǔ)句簡(jiǎn)單語(yǔ)句2.2.2.2 流程控制的概念流程控制的概念3.2.2.3 復(fù)合語(yǔ)句復(fù)合語(yǔ)句4.2.2.4 條件語(yǔ)句條件語(yǔ)句5.2.2.5 循環(huán)語(yǔ)句循環(huán)語(yǔ)句 Delphi 程序設(shè)計(jì)2.2.1 簡(jiǎn)單語(yǔ)句簡(jiǎn)單語(yǔ)句1.賦值語(yǔ)句賦值語(yǔ)句【例【例2.5】 變量賦值。變量賦值。2.空語(yǔ)句空語(yǔ)句3.過(guò)程調(diào)用語(yǔ)句過(guò)程調(diào)用語(yǔ)句讀語(yǔ)句讀語(yǔ)句寫語(yǔ)句寫語(yǔ)句【例【例2.6】 求一個(gè)三位數(shù)的數(shù)字和。求一個(gè)三位數(shù)的數(shù)字和?！纠纠?.7】 判斷一個(gè)年份是否為閏年。判斷一個(gè)年份是否為閏年。 Delphi 程序設(shè)計(jì)2.2.2 流程控制的概念流程控制的概念1.順序結(jié)構(gòu)

7、順序結(jié)構(gòu) 分支結(jié)構(gòu)分支結(jié)構(gòu) 循環(huán)結(jié)構(gòu)循環(huán)結(jié)構(gòu)語(yǔ)句1(a) 順序結(jié)構(gòu)語(yǔ)句2(b) if-else二路分支結(jié)構(gòu)語(yǔ)句1布爾表達(dá)式?語(yǔ)句2入口點(diǎn)出口點(diǎn)入口點(diǎn)出口點(diǎn)truefalse(c) while循環(huán)結(jié)構(gòu)語(yǔ)句布爾表達(dá)式?入口點(diǎn)出口點(diǎn)truefalse Delphi 程序設(shè)計(jì)圖圖2.4 不執(zhí)行與死循環(huán)不執(zhí)行與死循環(huán)語(yǔ)句1(a) 不執(zhí)行語(yǔ)句2出口點(diǎn)入口點(diǎn)語(yǔ)句1(b) 死循環(huán)語(yǔ)句2出口點(diǎn)入口點(diǎn) Delphi 程序設(shè)計(jì)2.2.3 復(fù)合語(yǔ)句復(fù)合語(yǔ)句begin 語(yǔ)句語(yǔ)句1; 語(yǔ)句語(yǔ)句2;end Delphi 程序設(shè)計(jì)2.2.4 條件語(yǔ)句條件語(yǔ)句1.if語(yǔ)句語(yǔ)句if語(yǔ)句的語(yǔ)法格式語(yǔ)句的語(yǔ)法格式if 布爾表達(dá)式布爾

8、表達(dá)式then 語(yǔ)句語(yǔ)句1else 語(yǔ)句語(yǔ)句2【例【例2.8】 求三個(gè)整數(shù)中的最大值。求三個(gè)整數(shù)中的最大值。復(fù)合條件復(fù)合條件if語(yǔ)句嵌套語(yǔ)句嵌套 Delphi 程序設(shè)計(jì)2.2.4 條件語(yǔ)句條件語(yǔ)句2.case語(yǔ)句語(yǔ)句case 表達(dá)式表達(dá)式 of 常量常量1: 語(yǔ)句語(yǔ)句1; 常量常量2: 語(yǔ)句語(yǔ)句2; else 語(yǔ)句語(yǔ)句n;end;【例【例2.9】 計(jì)算每月的天數(shù)。計(jì)算每月的天數(shù)。 Delphi 程序設(shè)計(jì)2.2.5 循環(huán)語(yǔ)句循環(huán)語(yǔ)句1.while語(yǔ)句語(yǔ)句while語(yǔ)句語(yǔ)法語(yǔ)句語(yǔ)法while 布爾表達(dá)式布爾表達(dá)式 do 語(yǔ)句語(yǔ)句【例【例2.10】 用用while語(yǔ)句求語(yǔ)句求110的累加和。的累加和

9、。while語(yǔ)句循環(huán)執(zhí)行次數(shù)問(wèn)題討論語(yǔ)句循環(huán)執(zhí)行次數(shù)問(wèn)題討論 Delphi 程序設(shè)計(jì)2.2.5 循環(huán)語(yǔ)句循環(huán)語(yǔ)句2.repeat語(yǔ)句語(yǔ)句repeat語(yǔ)句語(yǔ)法語(yǔ)句語(yǔ)法repeat 語(yǔ)句語(yǔ)句;until 布爾表達(dá)式布爾表達(dá)式;【例【例2.11】 用用repeat語(yǔ)句求語(yǔ)句求110的累加和。的累加和。repeat語(yǔ)句循環(huán)執(zhí)行次數(shù)問(wèn)題討論語(yǔ)句循環(huán)執(zhí)行次數(shù)問(wèn)題討論 Delphi 程序設(shè)計(jì)2.2.5 循環(huán)語(yǔ)句循環(huán)語(yǔ)句3.for語(yǔ)句語(yǔ)句for語(yǔ)句語(yǔ)法語(yǔ)句語(yǔ)法for 循環(huán)變量循環(huán)變量:=初值初值 to 終值終值 do 語(yǔ)句語(yǔ)句for 循環(huán)變量循環(huán)變量:=初值初值 downto 終值終值 do 語(yǔ)句語(yǔ)句【例【例

10、2.12】 用用for語(yǔ)句求語(yǔ)句求110的累加和。的累加和。for語(yǔ)句循環(huán)執(zhí)行次數(shù)問(wèn)題討論語(yǔ)句循環(huán)執(zhí)行次數(shù)問(wèn)題討論 Delphi 程序設(shè)計(jì)2.2.5 循環(huán)語(yǔ)句循環(huán)語(yǔ)句【例【例2.13】 求一個(gè)日期（年月日）對(duì)應(yīng)的是求一個(gè)日期（年月日）對(duì)應(yīng)的是星期幾。星期幾。4.多重循環(huán)多重循環(huán)【例【例2.14】 求求100以內(nèi)的素?cái)?shù)。以內(nèi)的素?cái)?shù)。 Delphi 程序設(shè)計(jì)2.3 定義數(shù)據(jù)類型定義數(shù)據(jù)類型1.2.3.1 類型定義類型定義2.2.3.2 枚舉和子界類型枚舉和子界類型3.2.3.3 類型兼容原則類型兼容原則 Delphi 程序設(shè)計(jì)2.3.1 類型定義類型定義type 類型類型 = 類型描述類型描述;例

11、如，例如，type datatype = integer; arrint = array 1.10 of integer; Delphi 程序設(shè)計(jì)2.3.2 枚舉和子界類型枚舉和子界類型1.枚舉類型枚舉類型定義枚舉類型定義枚舉類型type 枚舉類型枚舉類型 = (枚舉常量枚舉常量,枚舉常量枚舉常量)聲明枚舉類型變量聲明枚舉類型變量枚舉類型變量能夠進(jìn)行的操作枚舉類型變量能夠進(jìn)行的操作枚舉類型變量不能進(jìn)行的操作枚舉類型變量不能進(jìn)行的操作2.子界類型子界類型type 子界類型子界類型 = 常量常量1.常量常量2; Delphi 程序設(shè)計(jì)2.3.3 類型兼容原則類型兼容原則1.類型相同類型相同兩個(gè)數(shù)據(jù)

12、類型具有完全相同的性質(zhì)。兩個(gè)數(shù)據(jù)類型具有完全相同的性質(zhì)。 2.類型相容類型相容兩個(gè)不同的數(shù)據(jù)類型具有某些相同的性質(zhì)兩個(gè)不同的數(shù)據(jù)類型具有某些相同的性質(zhì)3.賦值相容賦值相容一種數(shù)據(jù)類型的值可以通過(guò)賦值操作賦給另一種數(shù)據(jù)類型的值可以通過(guò)賦值操作賦給另一種數(shù)據(jù)類型的變量。一種數(shù)據(jù)類型的變量。 Delphi 程序設(shè)計(jì)2.4 構(gòu)造數(shù)據(jù)類型構(gòu)造數(shù)據(jù)類型1.2.4.1 數(shù)組類型數(shù)組類型2.2.4.2 字符串類型字符串類型3.2.4.3 集合類型集合類型4.2.4.4 記錄類型記錄類型5.2.4.5 文件類型文件類型6.2.4.6 指針類型指針類型 Delphi 程序設(shè)計(jì)2.4.1 數(shù)組類型數(shù)組類型1.一維數(shù)

13、組一維數(shù)組定義一維數(shù)組類型定義一維數(shù)組類型type 數(shù)組類型數(shù)組類型 = array 下標(biāo)類型下標(biāo)類型 of 元素元素類型類型;聲明一維數(shù)組變量聲明一維數(shù)組變量數(shù)組聲明時(shí)可賦初值數(shù)組聲明時(shí)可賦初值數(shù)組元素的引用格式數(shù)組元素的引用格式數(shù)組元素的運(yùn)算數(shù)組元素的運(yùn)算獲得數(shù)組下標(biāo)的上界和下界獲得數(shù)組下標(biāo)的上界和下界兩個(gè)數(shù)組變量間的賦值運(yùn)算兩個(gè)數(shù)組變量間的賦值運(yùn)算 Delphi 程序設(shè)計(jì)【例【例2.15】 用一維數(shù)組計(jì)算用一維數(shù)組計(jì)算Fibonacci序列值。序列值。Fibonacci序列是指首兩項(xiàng)為序列是指首兩項(xiàng)為0、1，以后各項(xiàng)的，以后各項(xiàng)的值是其前兩項(xiàng)值之和的序列：值是其前兩項(xiàng)值之和的序列：0，1

14、，1，2，3，5，8，其數(shù)學(xué)中的遞推定義為：其數(shù)學(xué)中的遞推定義為： 2)2() 1(1 , 0)(nnfibnfibnnnfib Delphi 程序設(shè)計(jì)2. 二維數(shù)組二維數(shù)組【例【例2.16】 顯示螺旋方陣。顯示螺旋方陣。1234112342121314531116156410987 Delphi 程序設(shè)計(jì)3. 動(dòng)態(tài)數(shù)組動(dòng)態(tài)數(shù)組var a:array of integer;SetLength(a,5);【例【例2.17】 以動(dòng)態(tài)數(shù)組顯示幻方陣。以動(dòng)態(tài)數(shù)組顯示幻方陣。816357492 Delphi 程序設(shè)計(jì)4. 不規(guī)則的多維數(shù)組不規(guī)則的多維數(shù)組【例【例2.18】 使用動(dòng)態(tài)數(shù)組輸出楊輝三角。使用

15、動(dòng)態(tài)數(shù)組輸出楊輝三角。010423511112數(shù)組第一維數(shù)組元素11331yang0yang1yang5yang4yang3yang2數(shù)組名yang下標(biāo)321541464151010151 Delphi 程序設(shè)計(jì)2.4.2 字符串類型字符串類型1.3種字符串類型種字符串類型2.字符串元素的運(yùn)算字符串元素的運(yùn)算3.字符串變量的運(yùn)算字符串變量的運(yùn)算4.用于字符串運(yùn)算的標(biāo)準(zhǔn)過(guò)程和函數(shù)用于字符串運(yùn)算的標(biāo)準(zhǔn)過(guò)程和函數(shù)【例【例2.19】 判斷回文字符串。判斷回文字符串。 Delphi 程序設(shè)計(jì)2.4.3 集合類型集合類型1.集合類型的定義集合類型的定義type集合類型集合類型 = set of 元素類型元

16、素類型;2.集合類型的值集合類型的值3.集合類型的運(yùn)算集合類型的運(yùn)算賦值運(yùn)算賦值運(yùn)算關(guān)系運(yùn)算關(guān)系運(yùn)算屬于運(yùn)算屬于運(yùn)算集合運(yùn)算集合運(yùn)算【例【例2.20】 “篩選法篩選法”求素?cái)?shù)。求素?cái)?shù)。 Delphi 程序設(shè)計(jì)2.4.4 記錄類型記錄類型1.記錄類型與變量記錄類型與變量2.對(duì)記錄變量中的域進(jìn)行操作對(duì)記錄變量中的域進(jìn)行操作3.對(duì)記錄變量進(jìn)行賦值操作對(duì)記錄變量進(jìn)行賦值操作【例【例2.21】 使用記錄類型表示復(fù)數(shù)。使用記錄類型表示復(fù)數(shù)。4.開域語(yǔ)句開域語(yǔ)句type 記錄類型記錄類型 = record 域域1:類型類型1; 域域2:類型類型2; end; Delphi 程序設(shè)計(jì)5. 記錄數(shù)組記錄數(shù)組va

17、r group:array 1.50of student; groupi.number12i數(shù)組名下標(biāo)數(shù)組元素groupgroupi.namenumbernamegroup1groupi.sexsexgroupi.scorescoregroup2groupi50group50 Delphi 程序設(shè)計(jì)2.4.5 文件類型文件類型文件類型是一種構(gòu)造數(shù)據(jù)類型，根據(jù)文件中文件類型是一種構(gòu)造數(shù)據(jù)類型，根據(jù)文件中數(shù)據(jù)元素的數(shù)據(jù)類型，可將文件類型分為數(shù)據(jù)元素的數(shù)據(jù)類型，可將文件類型分為3種：種：文本文件、類型文件和無(wú)類型文件。文本文件、類型文件和無(wú)類型文件。對(duì)不同類對(duì)不同類型的文件所進(jìn)行的操作也有所差別。文

18、件類型型的文件所進(jìn)行的操作也有所差別。文件類型的定義語(yǔ)法和使用方法詳見(jiàn)的定義語(yǔ)法和使用方法詳見(jiàn)9.3節(jié)。節(jié)。 Delphi 程序設(shè)計(jì)2.4.6 指針類型指針類型1.變量所占用存儲(chǔ)單元的靜態(tài)分配與動(dòng)態(tài)分配變量所占用存儲(chǔ)單元的靜態(tài)分配與動(dòng)態(tài)分配2.靜態(tài)變量和動(dòng)態(tài)變量靜態(tài)變量和動(dòng)態(tài)變量3.聲明指針變量聲明指針變量4.指針?biāo)赶虻淖兞恐羔標(biāo)赶虻淖兞?.對(duì)指針變量的操作對(duì)指針變量的操作6.使用標(biāo)準(zhǔn)過(guò)程使用標(biāo)準(zhǔn)過(guò)程new與與dispose動(dòng)態(tài)生成或撤銷變動(dòng)態(tài)生成或撤銷變量量7.指針指向數(shù)組和記錄指針指向數(shù)組和記錄8.使用指針構(gòu)成鏈表使用指針構(gòu)成鏈表 Delphi 程序設(shè)計(jì)2.5 過(guò)程和函數(shù)過(guò)程和函數(shù)1.

19、2.5.1 過(guò)程的聲明與調(diào)用過(guò)程的聲明與調(diào)用2.2.5.2 函數(shù)的聲明與調(diào)用函數(shù)的聲明與調(diào)用3.2.5.3 變量的作用域變量的作用域4.2.5.4 參數(shù)傳遞參數(shù)傳遞5.2.5.5 過(guò)程過(guò)程/函數(shù)中參數(shù)的類型兼容原則函數(shù)中參數(shù)的類型兼容原則6.2.5.6 過(guò)程過(guò)程/函數(shù)的重載函數(shù)的重載7.2.5.7 遞歸的過(guò)程與函數(shù)遞歸的過(guò)程與函數(shù) Delphi 程序設(shè)計(jì)2.5.1 過(guò)程的聲明與調(diào)用過(guò)程的聲明與調(diào)用1.過(guò)程聲明過(guò)程聲明procedure 過(guò)程過(guò)程 (參數(shù)列表參數(shù)列表);/過(guò)程首部過(guò)程首部 局部聲明部分局部聲明部分;/過(guò)程聲明部分過(guò)程聲明部分begin/語(yǔ)句體語(yǔ)句體 語(yǔ)句語(yǔ)句;end;/此處以分號(hào)

20、結(jié)束此處以分號(hào)結(jié)束2.過(guò)程調(diào)用過(guò)程調(diào)用過(guò)程過(guò)程(參數(shù)參數(shù),參數(shù)參數(shù)) Delphi 程序設(shè)計(jì)2.5.2 函數(shù)的聲明與調(diào)用函數(shù)的聲明與調(diào)用1.函數(shù)聲明函數(shù)聲明function 函數(shù)函數(shù)(參數(shù)列表參數(shù)列表):類型類型;/函數(shù)首部函數(shù)首部 局部聲明部分局部聲明部分;/函數(shù)聲明部分函數(shù)聲明部分begin/語(yǔ)句體語(yǔ)句體 語(yǔ)句語(yǔ)句;end;2.函數(shù)怎樣返回值函數(shù)怎樣返回值fact:=10; /為函數(shù)名賦值，返回結(jié)果為函數(shù)名賦值，返回結(jié)果result:=10 /為為result變量賦值，返回結(jié)果變量賦值，返回結(jié)果3.函數(shù)調(diào)用函數(shù)調(diào)用函數(shù)過(guò)程函數(shù)過(guò)程(參數(shù)參數(shù),參數(shù)參數(shù))【例【例2.22】 計(jì)算階乘并顯示計(jì)算

21、公式。計(jì)算階乘并顯示計(jì)算公式。 Delphi 程序設(shè)計(jì)2.5.3 變量的作用域變量的作用域1.全局變量全局變量2.局部變量局部變量【例【例2.23】 求求100以內(nèi)的以內(nèi)的Smith數(shù)。數(shù)。 Delphi 程序設(shè)計(jì)2.5.4 參數(shù)傳遞參數(shù)傳遞1.參數(shù)聲明參數(shù)聲明2.值參數(shù)值參數(shù)3.變量參數(shù)變量參數(shù)4.常量參數(shù)常量參數(shù)5.輸出參數(shù)輸出參數(shù)6.參數(shù)默認(rèn)值參數(shù)默認(rèn)值【例【例2.24】 求求500以內(nèi)的親密數(shù)對(duì)。以內(nèi)的親密數(shù)對(duì)。 Delphi 程序設(shè)計(jì)2.5.5 過(guò)程過(guò)程/函數(shù)中參數(shù)的類型函數(shù)中參數(shù)的類型兼容原則兼容原則1.參數(shù)傳遞的類型兼容原則參數(shù)傳遞的類型兼容原則2.形式參數(shù)的類型聲明限制形式參數(shù)

22、的類型聲明限制3.函數(shù)返回值的類型限制函數(shù)返回值的類型限制 Delphi 程序設(shè)計(jì)2.5.6 過(guò)程過(guò)程/函數(shù)的重載函數(shù)的重載function Max(A,B: Integer): Integer; overload;function Max(A,B: Int64): Int64; overload;重載的多個(gè)過(guò)程重載的多個(gè)過(guò)程/函數(shù)之間必須滿足以下兩點(diǎn)：函數(shù)之間必須滿足以下兩點(diǎn)：參數(shù)必須不同，即以不同的參數(shù)個(gè)數(shù)或參數(shù)類參數(shù)必須不同，即以不同的參數(shù)個(gè)數(shù)或參數(shù)類型來(lái)區(qū)別重載的過(guò)程型來(lái)區(qū)別重載的過(guò)程/函數(shù)。函數(shù)。返回值可以相同，也可以不同，即不能以不同返回值可以相同，也可以不同，即不能以不同的返回值

23、來(lái)區(qū)別重載的過(guò)程的返回值來(lái)區(qū)別重載的過(guò)程/函數(shù)。函數(shù)。 Delphi 程序設(shè)計(jì)2.5.7 遞歸的過(guò)程與函數(shù)遞歸的過(guò)程與函數(shù)【例【例2.25】 使用遞歸函數(shù)計(jì)算階乘。使用遞歸函數(shù)計(jì)算階乘。2)!1(1 , 01!nnnnn5!返回 154!43!32!21!1(a) 遞歸調(diào)用5!54!43!32!21!1(b) 為每個(gè)遞歸調(diào)用返回一個(gè)值返回 2！=2返回 3！=6返回 4！=24返回 5！=120結(jié)果值 5！=1205！=54！=543！=5432！=54321！ Delphi 程序設(shè)計(jì)實(shí)驗(yàn)實(shí)驗(yàn)2 Object Pascal語(yǔ)言程語(yǔ)言程序設(shè)計(jì)基礎(chǔ)訓(xùn)練序設(shè)計(jì)基礎(chǔ)訓(xùn)練1.金額的中文大寫方式2.求解約瑟夫環(huán)問(wèn)題 15324(a) 初始化計(jì)數(shù)起點(diǎn)15304(b) 2出環(huán)后15300(c) 4出環(huán)后05300(d) 1出環(huán)后00300(e) 5出環(huán)后