【正文】 語句是一種無條件轉(zhuǎn)向語句，它可以控制直接從程序的一條語句轉(zhuǎn)向另一條語句。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 50 ? 賦值語句是最簡單的語句 , 賦值語句的作用是計算表達(dá)式的值，并賦給變量。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 49 ? 在聲明常量的時候，等號右邊可以使用一些預(yù)定義的函數(shù)，如 abs、 chr、 cos、 exp、 frac、 hi、 high、 int、length、 lo、 low、 odd、 ord、 pred、 round、 sin、sizeof、 sqr、 sqrt、和 trunc等。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 48 語句的格式 ? 1. 聲明語句 ? 聲明語句主要實現(xiàn)對標(biāo)號、常量、數(shù)據(jù)類型、變量、過程、函數(shù)、過程和函數(shù)的輸出等進(jìn)行聲明。 ? 由于操作數(shù)和運(yùn)算符都是有類型的，因而表達(dá)式也是有類型的，表達(dá)式的類型不一定和操作數(shù)相同，它取決于其中的運(yùn)算結(jié)果。 ? 表達(dá)式按照運(yùn)算符的優(yōu)先級進(jìn)行計算，求得一個表達(dá)式的值。這樣，上面第一個例子可寫作 x+(y*z)。有括號的表達(dá)式先被運(yùn)算，然后把它作為單個運(yùn)算數(shù)。此外，關(guān)系運(yùn)算符 =和 也可以對類進(jìn)行操作。 ? p:^Integer。 ? 以下規(guī)則適用于 =、 =、 =、 和 in 運(yùn)算符： ? 只有當(dāng) X（集合）中的每個成員也是 Y（集合）中的成員時， X = Y 才為真； Z = W 等同于 W = Z；只有當(dāng) U（集合）和 V（集合）正好擁有相同的成員時， U = V 才為真，否則 U V為真； ? 對于序數(shù) O 和集合 S，只有當(dāng) O 是 S 的一個成員時， O in S 才為真。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 42 ? 4．字符串運(yùn)算符 ? 加號（ +）還可以作為字符串運(yùn)算符，它可以將兩個字符串聯(lián)接在一起。 ? 對大多數(shù)簡單類型，比較運(yùn)算非常容易理解。 ? 若 y 為 0 的話，表達(dá)式 x/y、 x div y 和 x mod y 將發(fā)生運(yùn)行時錯誤 。如果一個運(yùn)算數(shù)是整數(shù)的子界類型，它就像整數(shù)類型一樣被對待。本節(jié)將主要學(xué)習(xí)這些運(yùn)算符的功能、性質(zhì)及其優(yōu)先級。例如算術(shù)運(yùn)算符的 +、 、 *和 /為雙目運(yùn)算符， +（正）和 （負(fù)）為單目運(yùn)算符來使用。）時不能包括初始化， variant 和文件類型的變量聲明也不能初始化。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 35 ? 例如： ? var ? i:integer = 7。 例如： ? var a,b,c:integer。 … 變量標(biāo)識符列表 n：類型 n。 Object Pascal的每一個變量都具有一種類型，變量的類型決定了變量的數(shù)據(jù)性質(zhì)和范圍、變量存儲在內(nèi)存中所占的大?。ㄗ止?jié)數(shù)）以及對變量可以進(jìn)行的合法操作等。 ? 常量標(biāo)識符的類型由定義它的常量的類型決定。 ? end. ? 運(yùn)行結(jié)果如圖 24所示： 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 31 常量與變量 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 32 常量 ? 常量存儲的是在程序中不能被修改的固定值。 ? end。 ? Day:= 21。 ? := 13。 ? end。 ? program Project1。記錄類型的定義方式如下： ? type ? 標(biāo)識符 = record ? 域 1: 數(shù)據(jù)類型 。 //為動態(tài)數(shù)組指定空間大小 ? 其中數(shù)組 a的索引值為 0..19。 ? // 一維數(shù)組 ? type TMatrix = array [1..10] of array [1..50] of Real。 ? TSuit = set of （ Club, Diamond, Heart, Spade） 。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 24 集合類 型 ? 集合類型（ set）由有序類型的一些數(shù)值組成。例如開始定義了一個表示顏色的枚舉類型： ? type ? TColors = （ Red, Blue,Green,Yellow,Orange,Purple,White,Black） 。 ? 枚舉元素只能是標(biāo)識符，而不能是數(shù)值常量或字符常量。一般的 Char表示一個AnsiChar字符。字符型必須用單引號“’”括起來，字母作為字符型時，大小寫是不等價的，并且字符型只允許單引號中有一個字符，否則就是字符串。 布爾型的值只有兩個： false和 True， 并且 false的序號是 0，True的序號是 1。 ? readln。 ? readln（ x） 。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 17 實例講解 ? 【 例 】 將輸入一個整數(shù)值并把它輸出到屏幕上。Object Pascal語言定義了 65個保留字，這些保留字不能被定義為標(biāo)識符。在程序設(shè)計語言中，程序中的數(shù)據(jù)定義、流程控制語句等都是由標(biāo)識符組成的。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 13 ? Pascal語言對于字母的大小寫不敏感。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 12 ? 標(biāo)識符可以由任意長的一個不帶空格的字符串組成，但是只有前面的 255個字符有效。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 10 標(biāo)識符與保留字 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 11 標(biāo)識符的組成和作用 ? 在 Object Pascal語言中使用的是 ASCII碼字符集，包括英語字母 A..Z、 a..z、數(shù)字 0..9和其他的一些標(biāo)準(zhǔn)字符。比如利用注釋符號形成一個矩形方框，在其中可以添加一些重要的說明文字。 ? 符號“ // ”的單個使用表示所在行的該符號之后的內(nèi)容為注釋。 ? 格式： readln([V1, V2, ...,Vn ]) ? 4)writeln ? 功能： writedln與 write的功能相似，只是在輸出的后面多輸出一個回車符。b=2。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 6 ? 2)write ? 功能： write在 DOS屏幕下輸出 n個數(shù)據(jù)，并將這些數(shù)據(jù)賦值給 n個變量。 ? 例如： ? var a,b:integer。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 5 ? Read和 Write函數(shù) ? 1)Read ? 功能： read在 DOS屏幕下通過鍵盤讀入 n個數(shù)據(jù)，并將這些數(shù)據(jù)賦值給 n個變量。 ? 5）修改文件 。系統(tǒng)會自動創(chuàng)建一個控制臺程序的工程，并在代碼編輯窗口中打開 。最少情況下可以只有一個工程文件（ .dpr）和一個可執(zhí)行文件（ .exe）。在開發(fā)階段，編譯、鏈接的速度比較快。南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 1 第 2章 Object Pascal程序設(shè)計語言 控制臺程序 注釋 標(biāo)識符與關(guān)鍵字 基本數(shù)據(jù)類型 復(fù)雜數(shù)據(jù)類型 常量與變量 運(yùn)算符與表達(dá)式 語句 過程與函數(shù) 消息框過程和函數(shù) 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 2 控制臺程序 ? 控制臺程序是指一些沒有圖形用戶界面的 32位 Windows應(yīng)用程序，通常在控制臺窗口中運(yùn)行，也就是在類似以前的 DOS環(huán)境下運(yùn)行。 ? 控制臺程序的代碼比較小，一般在幾十千字節(jié)左右，占用的系統(tǒng)資源少。 ? 控制臺程序相關(guān)文件少。 ? 2）在 Delphi集成開發(fā)環(huán)境中，通過菜單 【 File】 |【 New】 打開 【 New Items】 對話框，選中 【 New】 標(biāo)簽中的 【 Console Application】 項，如圖 21所示，按下 【 OK】 按鈕。 ? 4）現(xiàn)在可以編譯、鏈接和運(yùn)行程序，將順利生成一個可執(zhí)行程序，只是該程序不做任何工作就退出了。運(yùn)行結(jié)果界面如圖 22所示。 ? 格式： read([V1, V2, ...,Vn ]) ? 說明： V1可以是基本數(shù)據(jù)類型的變量，也可以是字符常量。 ? 在 DOS屏幕下輸入 1 2回車后， a的值是 1， b的值是 2。 ? a=1。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 7 ? 3)readln ? 功能： readln與 read的功能相似，只是在最后多讀入一個回車符。 ? 組合符號“（ *”與“ * ）”的成對使用表示它們之間的內(nèi)容為注釋部分。 南昌理工學(xué)院計算機(jī)系 Delphi 程序設(shè)計基礎(chǔ) 202291 9 ? 有時可以利用注釋在代碼中形成一個醒目的標(biāo)志。 ? 由于 Delphi集成開發(fā)環(huán)境中的代碼編輯器在顯示不同類型的代碼時通過使用不同的顏色來加以區(qū)別，所以在編程的過程中，只要注意文件中代碼的顏色，一般就不會錯誤地使用注釋符了。 = [ ] ^ { } ? 另外，有些字符對也作為單個的特殊符號存在，具體有： ? （ * （ . *） .） .. // := = = ? 其中，左中括號“ [”等價于“ （ .”，右中括號“ ]”等價于“ . ）”，左大括號“ {”等價于“（ *”，右大括號“）”等價于“ * ）”。 ? 正確形式 錯誤形式 ? count 123count ? test123 14_count ? time new$123 ? _123 abc 123 ? 一般標(biāo)識符可以由一個或多個具有適當(dāng)意義的英文單詞組成。 ? 標(biāo)識符是用來對常量、變量、函數(shù)標(biāo)號和其他用戶定義對象