【正文】 ar表示一個(gè)AnsiChar字符。 ? AnsiChar是傳統(tǒng)的 Pascal語(yǔ)言的字符，是標(biāo)準(zhǔn)的一字節(jié)的 ANSI字符； WideChar用于保存單個(gè)兩字節(jié)的 Unicode字符。字符型必須用單引號(hào)“’”括起來(lái)，字母作為字符型時(shí)，大小寫(xiě)是不等價(jià)的，并且字符型只允許單引號(hào)中有一個(gè)字符，否則就是字符串。 boolean是布爾型的標(biāo)識(shí)符 。 布爾型的值只有兩個(gè)： false和 True， 并且 false的序號(hào)是 0，True的序號(hào)是 1。 Object Pascal支持五種預(yù)定義實(shí)型，它們是 real（基本實(shí)型）、 single（單精度實(shí)型）、 double（雙精度實(shí)型）、 extended（擴(kuò)展實(shí)型）、 p（裝配實(shí)型）和 currency（貨幣實(shí)型），每一種類型規(guī)定了相應(yīng)的實(shí)數(shù)取值范圍、所占用的內(nèi)存字節(jié)數(shù)以及它們所能達(dá)到的精度。 ? readln。 ? //下面的代碼是為了在按下回車鍵前始終顯示運(yùn)行界面 ? writeln（’按下回車鍵 Enter退出。 ? readln（ x） 。 ? {$APPTYPE CONSOLE} ? var ? x:integer。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 17 實(shí)例講解 ? 【 例 】 將輸入一個(gè)整數(shù)值并把它輸出到屏幕上。Object Pascal支持五種預(yù)定義整型，它們是 shortint（短整型）、 smallint（整型）、 longint（長(zhǎng)整型）、 byte（字節(jié)型）、word（字類型）和 longword（雙字型），每一種類型規(guī)定了相應(yīng)的整數(shù)取值范圍以及所占用的內(nèi)存字節(jié)數(shù)。Object Pascal語(yǔ)言定義了 65個(gè)保留字，這些保留字不能被定義為標(biāo)識(shí)符。下面我們來(lái)學(xué)習(xí)下Object Pascal的保留字。在程序設(shè)計(jì)語(yǔ)言中，程序中的數(shù)據(jù)定義、流程控制語(yǔ)句等都是由標(biāo)識(shí)符組成的。在編寫(xiě)程序的時(shí)候要保持一定的風(fēng)格，不要有時(shí)候全部大寫(xiě)標(biāo)識(shí)符，另一些時(shí)候又實(shí)行大小寫(xiě)混寫(xiě)。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 13 ? Pascal語(yǔ)言對(duì)于字母的大小寫(xiě)不敏感。 ? 下面是一些正確或錯(cuò)誤標(biāo)識(shí)符命名的實(shí)例。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 12 ? 標(biāo)識(shí)符可以由任意長(zhǎng)的一個(gè)不帶空格的字符串組成，但是只有前面的 255個(gè)字符有效。 ‘ （ ） * + , ? . / : 。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 10 標(biāo)識(shí)符與保留字 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 11 標(biāo)識(shí)符的組成和作用 ? 在 Object Pascal語(yǔ)言中使用的是 ASCII碼字符集，包括英語(yǔ)字母 A..Z、 a..z、數(shù)字 0..9和其他的一些標(biāo)準(zhǔn)字符。比如前面的例 。比如利用注釋符號(hào)形成一個(gè)矩形方框，在其中可以添加一些重要的說(shuō)明文字。 ? 建議對(duì)于單行和少量幾行的注釋使用符號(hào)“ // ”，對(duì)于大塊注釋使用“ {”和“ }”或“（ *”和“ * ）”。 ? 符號(hào)“ // ”的單個(gè)使用表示所在行的該符號(hào)之后的內(nèi)容為注釋。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 8 注釋 ? Object Pascal語(yǔ)言中的注釋有下面三種形式： ? 組合符號(hào)“ {”與“ }”的成對(duì)使用表示它們之間的內(nèi)容為注釋部分。 ? 格式： readln([V1, V2, ...,Vn ]) ? 4)writeln ? 功能： writedln與 write的功能相似，只是在輸出的后面多輸出一個(gè)回車符。 //輸出 a、 b兩個(gè)整型變量的數(shù)據(jù)。b=2。 ? 例如： ? var a,b:integer。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 6 ? 2)write ? 功能： write在 DOS屏幕下輸出 n個(gè)數(shù)據(jù)，并將這些數(shù)據(jù)賦值給 n個(gè)變量。 //讀入 2個(gè)整型數(shù)據(jù)，并將這 2個(gè)整型數(shù)據(jù)賦值給 a、 b這兩個(gè)變量。 ? 例如： ? var a,b:integer。用法與 C語(yǔ)言的 scanf函數(shù)用法相似。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 5 ? Read和 Write函數(shù) ? 1)Read ? 功能： read在 DOS屏幕下通過(guò)鍵盤(pán)讀入 n個(gè)數(shù)據(jù)，并將這些數(shù)據(jù)賦值給 n個(gè)變量。 ? 在程序提示“請(qǐng)輸入一行文字：”后，輸入“ Hello World !”。 ? 5）修改文件 。本章后面的例程都可以利用本工程來(lái)方便地實(shí)現(xiàn)。系統(tǒng)會(huì)自動(dòng)創(chuàng)建一個(gè)控制臺(tái)程序的工程，并在代碼編輯窗口中打開(kāi) 。 ? 1）創(chuàng)建指定目錄下新建一個(gè) “控制臺(tái)” 文件夾。最少情況下可以只有一個(gè)工程文件（ .dpr）和一個(gè)可執(zhí)行文件（ .exe）。所以我們利用它可以方便學(xué)習(xí)和掌握Object Pascal語(yǔ)言。在開(kāi)發(fā)階段，編譯、鏈接的速度比較快。如 Windows目錄下的 。南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 1 第 2章 Object Pascal程序設(shè)計(jì)語(yǔ)言 控制臺(tái)程序 注釋 標(biāo)識(shí)符與關(guān)鍵字 基本數(shù)據(jù)類型 復(fù)雜數(shù)據(jù)類型 常量與變量 運(yùn)算符與表達(dá)式 語(yǔ)句 過(guò)程與函數(shù) 消息框過(guò)程和函數(shù) 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 2 控制臺(tái)程序 ? 控制臺(tái)程序是指一些沒(méi)有圖形用戶界面的 32位 Windows應(yīng)用程序，通常在控制臺(tái)窗口中運(yùn)行，也就是在類似以前的 DOS環(huán)境下運(yùn)行。這些程序很少要求用戶輸入大量的信息，一般只實(shí)現(xiàn)有限的特定的功能。 ? 控制臺(tái)程序的代碼比較小，一般在幾十千字節(jié)左右，占用的系統(tǒng)資源少。在學(xué)習(xí)計(jì)算機(jī)語(yǔ)言的過(guò)程中，可以上機(jī)編寫(xiě)一些短小的控制臺(tái)程序進(jìn)行練習(xí)。 ? 控制臺(tái)程序相關(guān)文件少。 ? 下面我們通過(guò)一個(gè)具體的例子進(jìn)行講解： 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 3 實(shí)例講解 ? 【 例 】 創(chuàng)建一個(gè)控制臺(tái)程序。 ? 2）在 Delphi集成開(kāi)發(fā)環(huán)境中，通過(guò)菜單 【 File】 |【 New】 打開(kāi) 【 New Items】 對(duì)話框，選中 【 New】 標(biāo)簽中的 【 Console Application】 項(xiàng)，如圖 21所示，按下 【 OK】 按鈕。 ? 3）通過(guò)菜單 【 File】 |【 Save All】 將工程文件保存在創(chuàng)建的目錄中。 ? 4）現(xiàn)在可以編譯、鏈接和運(yùn)行程序，將順利生成一個(gè)可執(zhí)行程序，只是該程序不做任何工作就退出了。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 4 ? 6）編譯、鏈接和運(yùn)行程序，測(cè)試效果。運(yùn)行結(jié)果界面如圖 22所示。各個(gè)數(shù)據(jù)之間可以通過(guò)指定字符，如果沒(méi)有指定字符用空格字符或用回車符分隔。 ? 格式： read([V1, V2, ...,Vn ]) ? 說(shuō)明： V1可以是基本數(shù)據(jù)類型的變量，也可以是字符常量。 ? read(a,b)。 ? 在 DOS屏幕下輸入 1 2回車后， a的值是 1， b的值是 2。 ? 格式： write([P1,P2, ...,Pn]) ? 說(shuō)明： P1可以是基本數(shù)據(jù)類型的變量，也可以是字符常量。 ? a=1。 ? write(a,b)。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 7 ? 3)readln ? 功能： readln與 read的功能相似，只是在最后多讀入一個(gè)回車符。 ? 格式： writeln([V1, V2, ...,Vn ]) ? 注意：這 4個(gè)函數(shù)只能在 DOS環(huán)境下使用。 ? 組合符號(hào)“（ *”與“ * ）”的成對(duì)使用表示它們之間的內(nèi)容為注釋部分。 ? 注意： ? 注釋符“ {”與“ }”、“（ *”與“ * ）”在使用時(shí)不支持注釋的嵌套，而且必須成對(duì)使用。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 9 ? 有時(shí)可以利用注釋在代碼中形成一個(gè)醒目的標(biāo)志。 ? 在注釋符“ {”或“（ *”后緊接著的是一個(gè)美元符號(hào)“ $”時(shí)，表示該句是一個(gè)編譯器指令，它與普通的注釋不同，通常用來(lái)對(duì)編譯過(guò)程進(jìn)行設(shè)置。 ? 由于 Delphi集成開(kāi)發(fā)環(huán)境中的代碼編輯器在顯示不同類型的代碼時(shí)通過(guò)使用不同的顏色來(lái)加以區(qū)別，所以在編程的過(guò)程中，只要注意文件中代碼的顏色，一般就不會(huì)錯(cuò)誤地使用注釋符了。 ? 下面的單個(gè)字符作為特殊符號(hào)存在： ? $ amp。 = [ ] ^ { } ? 另外，有些字符對(duì)也作為單個(gè)的特殊符號(hào)存在，具體有： ? （ * （ . *） .） .. // := = = ? 其中，左中括號(hào)“ [”等價(jià)于“ （ .”，右中括號(hào)“ ]”等價(jià)于“ . ）”，左大括號(hào)“ {”等價(jià)于“（ *”，右大括號(hào)“）”等價(jià)于“ * ）”。標(biāo)識(shí)符的第一個(gè)字符必須是字母或下劃線，其余字符可以是字母、數(shù)字或下劃線。 ? 正確形式 錯(cuò)誤形式 ? count 123count ? test123 14_count ? time new$123 ? _123 abc 123 ? 一般標(biāo)識(shí)符可以由一個(gè)或多個(gè)具有適當(dāng)意義的英文單詞組成。當(dāng)然，字符串中的大小寫(xiě)字母是需要分清的。 ? 標(biāo)識(shí)符是用來(lái)對(duì)常量、變量、函數(shù)標(biāo)號(hào)和其他用戶定義對(duì)象等進(jìn)行命名的。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 14 保留字和指令字 ? 在標(biāo)識(shí)符中，有一些是系統(tǒng)已經(jīng)使用的，它們已有特定的含義，用戶不能再用它們對(duì)自己定義的量命名。 ? Object Pascal語(yǔ)言本身使用的一組標(biāo)識(shí)符亦稱為保留字，你必須了解它的含義，以便于正確的使用，否則會(huì)造成錯(cuò)誤。 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291 15 基本數(shù)據(jù)類型 南昌理工學(xué)院計(jì)算機(jī)系 Delphi 程序設(shè)計(jì)基礎(chǔ) 202291