【正文】 ? 用于顯示工作狀態(tài)，提示當(dāng)前程序所做的工作等等。 ? 子菜單項(xiàng)后有 “ ” 記號，表示該子菜單項(xiàng)還有下一級菜單； ? 子菜單項(xiàng)后有 “ ?” 記號，表示選擇該操作后會(huì)出現(xiàn)相應(yīng)的對話框。例如：Alt + F就可打開 File菜單。按回車打開所選的主菜單。 子菜單 快捷鍵 功能描述 Breakpoints 打開 Breakpoints窗口，顯示正在調(diào)試程序的所有斷點(diǎn) Register 打開 Register窗口，顯示正在調(diào)試程序的寄存器 Watch 打開 Watch窗口，顯示被跟蹤變量的值 Output 打開 Output窗口，顯示程序運(yùn)行的結(jié)果 User screen ALT+F5 進(jìn)入 DOS提示符狀態(tài)，顯示程序運(yùn)行的結(jié)果 Modify CTRL+F4 打開 Modify窗口，輸入需要檢查和更改的被跟蹤變量 ADD breakpoint 打開 ADD breakpoint窗口，設(shè)置一個(gè)新的斷點(diǎn) ADD watch CTRL+F7 打開 ADD watch窗口，添加一個(gè)被跟蹤變量。 子菜單 快捷鍵 功能描述 Run CTRL+F9 運(yùn)行當(dāng)前程序 Step over F8 單步運(yùn)行當(dāng)前程序，遇到函數(shù)和過程調(diào)用一次運(yùn)行完畢，不跟蹤其內(nèi)部 Trace into F7 單步執(zhí)行當(dāng)前程序，遇到函數(shù)和過程調(diào)用，跟蹤到其內(nèi)部 Go to cursor F4 運(yùn)行程序到光標(biāo)所在代碼行處 Program reset CTRL+F2 將正在運(yùn)行的程序復(fù)位 Parameters 顯示 Program Parameters對話框，設(shè)置程序運(yùn)行參數(shù) Compile菜單的介紹 Compile菜單提供在集成調(diào)試環(huán)境下編譯 Pascal的功能，如編譯、連接等。 子菜單 快捷鍵 功能描述 Undo Alt+Backspace 撤銷最近的操作 Redo 撤銷 Undo的操作 Cut Shift+Del 刪除選定的文本，并將其置于剪貼板中 Copy Ctrl+Ins 將選中的文本復(fù)制到剪貼板中 Paste Shift+Ins 將剪貼板中的文本粘貼到當(dāng)前窗口光標(biāo)處 Clear Ctrl+Del 刪除所選定的文本 show clipboard 顯示剪貼板中的內(nèi)容 Search菜單的介紹 Search菜單提供與字符串搜索的相關(guān)功能，如執(zhí)行程序、單步執(zhí)行等。 end. 這是一段 Pascal語言寫的代碼，它運(yùn)行的結(jié)果是什么？解決了什么問題呢？ 編輯器中的代碼 菜單欄 編輯窗口 狀態(tài)欄 File菜單的介紹 File菜單用于對文件的管理，如新建文件、打開文件、保存文件等。 b:=c。 c:=a。 begin writeln(‘ 請輸入兩個(gè)數(shù)： ’ )。 end. 輸入： 3 4 輸入： 8 5 輸出： 90 輸出： 0 Free Pascal實(shí)例演示 Program p2_01(input,output)。 end。 5: b:=a*50。 3: b:=a*30。 case a of 1: b:=a*10。 var a,b:integer。 writeln(sum)。 sum:=sum+21252。 c:=c mod 33。 a:=a mod 23。 var a,b,c,d,sum:longint。 if (num1num2) then writeln(num1,’’,num2) else if (num1=num2) then writeln(num1,’=’,num2) else writeln(num1,’’,num2)。 write(‘Please input the second integer:’)。 begin write(‘Please input the first integer:’)。 end. Program test1。 end。 false: day:=28。{———— 以上處理 31天和 30天的情況 } 2:begin runnian:=(year mod 400=0) or ((year mod 4=0) and (year mod 1000))。 case month of 1,3,5,7,8,10,12: day:=31。)。 begin write(39。 var year,month,day:integer。 例：從鍵盤上讀入年和月，輸出該月有多少天。 end。 ‘*’: s:=x*y。 case ch of ‘+’: s:=x+y。 readln(x,y)。 ch:char。 4. 語句可以是多個(gè)語句，但必須用語句括號 begin……end 括起 5. case語句也可以嵌套 Program example6。 2. 標(biāo)號必須是一常量，其類型與表達(dá)式的類型一致。 格式： case 表達(dá)式 of 標(biāo)號 1：語句 1； 標(biāo)號 2：語句 2； …… 標(biāo)號 n：語句 n； else 語句 n+1 end。 else write(d)。 writeln(‘d=’,d)。d:=odd(b)。b:=7。 c,d:Boolean。 (A) if ab then if c=d then x:=y else m:=n (B) if ab then begin if c=d then x:=y else m:=n end D program ex1(input)。 y:=z。 IF xy THEN z:=x。 if bmax then max:=b。 b:=10。 (A)100 (B)80 (C)90 (D)70 下列程序段運(yùn)行后，變量 max的值為（ ）。 X:=20。規(guī)定 90分以上為 A， 8090分為 B， 6079分為 C， 60分 以下者為 D。 end. write(‘deng ji shi:’)。 else writeln(‘D’)。 var score:real。 Writeln(‘y=’,y)。 if x0 then y:=1 else 例：有一個(gè)函數(shù)表達(dá)式為： y = 1 x0 0 x0 1 x0 編寫程序，輸入 x，輸出 y的值。 begin write(‘Please input x:’)。 var x:real。 2. 為了增強(qiáng)程序的可讀性，最好將條件嵌套語句寫成縮進(jìn)式形式。 end. 練一練：已知程序如下，輸出程序運(yùn)行的結(jié)果。 end。 x:=z。 end。 x:=y。 end。 x:=y。 readln(x,y,z)。 var x,y,z,t:integer。 end. 例：某超市要根據(jù)兩種貨物 a和 b的庫存情況制定進(jìn)貨順序，原則是庫存少的具有優(yōu)先進(jìn)貨權(quán)。 writeln(‘(1) a’)。 writeln(‘(2) b’)。 begin readln(a,b)。 復(fù)合語句的格式 Begin 語句 1； 語句 2； 語句 3； …… 語句 n； end； Program example2。 writeln(b)。程序如下： 條件（ if）語句 if a mod 2 =0 then begin writeln(a, ’oushu’)。 if xy then writeln(‘x=’,x) else writeln(‘y=’,y)。 begin write(‘Please input x,y:’)。 end. Program example1。 if a mod 2 =0 then writeln(a,’oushu’)。 var a:integer。 表達(dá)式 True AND NOT Odd(202)(73=4)的值是（ ）。 關(guān)系運(yùn)算對數(shù)據(jù)的比較則是按照其序號大小關(guān)系進(jìn)行比較的， 如：’ X’‘Y’。 定義后 t和 f就成了布爾變量，他們的值可能是 true或 false； Pascal語言系統(tǒng)中將 true和 false的序號定為 1和 0，可以看出 true要大于 false， 即： falsetrue. 注意：布爾變量的值只允許通過賦值獲得，不能通過 read語句輸入。 在程序的執(zhí)行部分就可以用 t代表“真”， f代表“假”。 邏輯運(yùn)算及布爾表達(dá)式 （ 1）布爾常量