【正文】 16 整型 ? 整型數(shù)據(jù)（ integer）用來(lái)存放整數(shù)。它們的特性如下表 23所示。 ? program Project1。 ? begin ? writeln（’請(qǐng)輸入一個(gè)整數(shù)：’） 。 ? writeln（’你輸入整數(shù)的是：’ ,x） ?！?。 ? end. 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 18 實(shí)型 ? 實(shí)型數(shù)據(jù)（ real）用類存放實(shí)數(shù)。 ? 類型 數(shù)值范圍 占字節(jié)數(shù) 有效位數(shù) ? Real 10^39～ 10^38 6 11～ 16 ? Single 10^45～ 10^38 4 7～ 8 ? Double 10^324～ 10^308 8 15～ 16 ? Comp 2^63+1～ 2^631 8 19～ 20 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 19 布爾型 ? 布爾型 （ boolean） 數(shù)據(jù)用來(lái)存放邏輯值 （ 布爾值 ） 。 false 和 True都是預(yù)定義常數(shù)標(biāo)識(shí)符 ，分別表示邏輯假和邏輯真 。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 20 字符型 ? 字符型（ character）用 char作為標(biāo)識(shí)符。 ? 字符型是 ASCII字符的集合，包括 2種類型：標(biāo)準(zhǔn)字符和寬字符。 Unicode字符集的前 256個(gè)字符與 ANSI字符集相同。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 21 枚舉類 型 ? 枚舉類型（ enumerated）是由一組有序的標(biāo)識(shí)符組成的，形式如下： ? type ? typeName = （標(biāo)識(shí)符 1， …… ，標(biāo)識(shí)符 n） 。 ? 例如： ? type ? Weektype=（ Sun,Mon,Tue,Wed,Thur,Fri,Sat） 。不要把作為枚舉元素的標(biāo)識(shí)符視作變量名，它不能被賦值。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 22 字界類 型 ? 子界類型（ subrange）為某個(gè)有序類型的子集。 ? 接著就可以定義一個(gè)子界類型如下： ? type ? TMyColors = Green..White。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 23 復(fù)雜數(shù)據(jù)類型 ? 結(jié)構(gòu)類型（ Struct）包括集合類型（ set）、數(shù)組類型（ array）、記錄類型（ record）、文件類型（ file）、類類型（ class）、類引用類型（ class reference）和接口類型（ interface）等。定義方法如下： ? set of 基類型 ? 例如： ? type ? TSomeInts = 1.. // 定義集合類型 ? TACopyOfByte = set of Byte。 ? TACopyOfChar = set of Char。 ? 1．靜態(tài)數(shù)組的定義方式如下： ? array [下標(biāo)下限 ..下標(biāo)上限 ] of 基類型 ? 例如： ? var MyArray: array [1..100] of Char。 ? // 兩維數(shù)組 ? type TMatrix = array [1..10, 1..50] of Real。 //定義動(dòng)態(tài)數(shù)組 ? 可以通過(guò)過(guò)程 SetLength來(lái)為動(dòng)態(tài)數(shù)組指定空間大小，例如： ? SetLength(a,20)。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 27 記錄類型 ? 記錄類型（ record）可以由不同類型的元素組成，這些元素稱為域。數(shù)據(jù)類型可以是 Object Pascal語(yǔ)言中預(yù)定義的類型，也可以是程序員自定義的類型。 ? … ? 域 n: 數(shù)據(jù)類型 。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 28 實(shí)例講解 ? 【 例 】 該例說(shuō)明了記錄類型的定義與使用，同時(shí)也對(duì)with語(yǔ)句進(jìn)行了說(shuō)明。 ? {$APPTYPE CONSOLE} ? type ? TDateRec = record // 記錄類型的定義 ? Year:integer。 ? Day: 1..31。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 29 ? var ? Record1, Record2: TDateRec。 // 給記錄中的域賦值 ? := Sep。 ? with Record1 do // 使用 with語(yǔ)句可以簡(jiǎn)化代碼的輸入 ? begin ? Year:= 1973。 ? Month:= Jul。 ? end。 // 對(duì)記錄進(jìn)行拷貝 ? with Record1 do ? begin ? writeln(format(’%d年 %d月 %d日’ ,[Year,7,Day]))。 ? writeln(’按下回車鍵 Enter退出。 ? readln。常量定義出現(xiàn)在說(shuō)明部分。 … 常量標(biāo)識(shí)符 =常量 。例如：const a=12 隱含說(shuō)明 a是整型； const r= r是實(shí)型 …… ? 常量定義部分必須以保留字 const開(kāi)頭，可以包含一個(gè)或幾個(gè)常量定義，而且每個(gè)常量均以分號(hào)結(jié)束。變量具有三個(gè)基本要素：名字、類型和值。 ? 1．變量聲明格式 ? 一個(gè)變量由標(biāo)識(shí)符、類型和可選的初始化共同定義的。 變量標(biāo)識(shí)符列表 2：類型 2。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 34 ? 其中，保留字 var表示開(kāi)始一個(gè)變量說(shuō)明部分。每個(gè)變量說(shuō)明均以分號(hào)結(jié)束。 ? m,n:real。格式如下： ? var ? 變量標(biāo)識(shí)符 :類型 = 常量表達(dá)式 。 ? 相當(dāng)于聲明和語(yǔ)句 ? var ? i:integer。 ? 同時(shí)聲明多個(gè)變量（比如 var x,y,z: Real。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 36 運(yùn)算符和表達(dá)式 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 37 運(yùn)算符 ? 運(yùn)算符是在代碼中對(duì)各種數(shù)據(jù)類型進(jìn)行運(yùn)算的符號(hào)。按照操作數(shù)數(shù)目的多少來(lái)分，運(yùn)算符分為下面兩類：?jiǎn)文窟\(yùn)算符（ Unary Operator）和雙目運(yùn)算符（ Binary Operator）。單目運(yùn)算符一般放在操作對(duì)象的前面，只有指針運(yùn)算符（ ^）可以放在操作對(duì)象的后面。 ? Object Pascal語(yǔ)言中主要的運(yùn)算符有：算術(shù)運(yùn)算符、邏輯運(yùn)算符、關(guān)系運(yùn)算符、布爾運(yùn)算符、字符串運(yùn)算符、集合運(yùn)算符、地址運(yùn)算符等。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 38 ? 1．算術(shù)運(yùn)算符 ? 算術(shù)運(yùn)算符與普通數(shù)學(xué)中的運(yùn)算符意義相同。以下規(guī)則適用于算術(shù)運(yùn)算符： ? 不管 x 和 y 的類型是什么， x/y 的結(jié)果總是擴(kuò)展類型（ extended）；對(duì)其它運(yùn)算符，只要有一個(gè)運(yùn)算數(shù)是實(shí)數(shù)類型，它的結(jié)果就是擴(kuò)展類型；另外，只要有一個(gè)運(yùn)算數(shù)是 Int64 類型，它的結(jié)果就是 Int64 類型；否則，結(jié)果就是整數(shù)類型。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 39 ? x div y 的值取整數(shù)，也就是取得 x/y 的值，然后以 0 的方向取得最近的整數(shù)。換句話說(shuō)，就是 x mod y = x （ x div y） *y。 ? 2．邏輯運(yùn)算符 ? 邏輯運(yùn)算符對(duì)邏輯類型的操作數(shù)進(jìn)行運(yùn)算，數(shù)據(jù)結(jié)果也為邏輯類型，如表 28所示。 =、 、 = 和 = 也用作集合運(yùn)算符， = 和 也用作指針運(yùn)算符。比如，只有i 和 j 有相同的值， i = j 才是真，否則 ij為真。當(dāng)用于類類型時(shí)， = 和 的計(jì)算規(guī)則與指針一樣，只有當(dāng) C 和D 指向同一個(gè)實(shí)例對(duì)象時(shí)， C = D 為真，否則 C D 為真；當(dāng)用于類引用時(shí)，只有當(dāng) C 和 D 表示同一個(gè)類時(shí)， C = D 為真，否則 C D 為真。如果兩個(gè)字符串都是短字符串，那么在結(jié)果字符串長(zhǎng)度超過(guò) 255個(gè)字符的情況下，只有前面 255個(gè)字符有效。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 43 ? +、 – 和 * 的運(yùn)算結(jié)果屬于集合類型 set of A..B，這里 A 是結(jié)果中的最小序數(shù)， B 是結(jié)果中的最大序數(shù)。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 44 ? 6．地址運(yùn)算符 ? 地址運(yùn)算符為 ，其作用是用來(lái)獲取變量、函數(shù)或?qū)ο蠓椒ǖ牡刂贰? ? 如： k:Integer。 ? k:=8。 ? 7. 類運(yùn)算符 ? 類運(yùn)算符 as和 is對(duì)類或類的實(shí)例進(jìn)行操作。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 45 ? 8．運(yùn)算符的優(yōu)先級(jí) ? 具有較高優(yōu)先級(jí)的運(yùn)算符先進(jìn)行運(yùn)算，具有相同優(yōu)先級(jí)的運(yùn)算符從左邊開(kāi)始。 ? 使用圓括號(hào)來(lái)覆蓋優(yōu)先級(jí)規(guī)則。比如 (x+y)*z,它把 x 和 y 的和乘以 z。 ? 括號(hào)通常使代碼更容易讀寫(xiě)，即使有時(shí)候嚴(yán)格說(shuō)來(lái)它們是多余的。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 46 表達(dá)式 ? 表達(dá)式是算法語(yǔ)言的基本組成部分，它表示一種求值規(guī)則，通常由操作數(shù)、運(yùn)算符和圓括號(hào)。表達(dá)式中出現(xiàn)的變量名必須已經(jīng)被初始化。運(yùn)算符中圓括號(hào)的優(yōu)先級(jí)最高，運(yùn)算次序是“先內(nèi)層后外層”，因此先計(jì)算由圓括號(hào)括起來(lái)的子表達(dá)式，圓括號(hào)還可以多級(jí)嵌套。 ? Object Pascal規(guī)定了表達(dá)式的運(yùn)算規(guī)則，對(duì)操作數(shù)類型、運(yùn)算符性質(zhì)、運(yùn)算結(jié)果類型、及運(yùn)算次序都做了嚴(yán)格的