在未系統(tǒng)學(xué)習(xí)Pascal語(yǔ)言之前,暫且繞過(guò)那些繁瑣的語(yǔ)法規(guī)則細(xì)節(jié),通過(guò)下面的簡(jiǎn)單例題,可以速成掌握Pascal程序的基本組成和基本語(yǔ)句的用法,讓初學(xué)者直接模仿學(xué)習(xí)編簡(jiǎn)單程序。
[例1.1]編程在屏幕上顯示“Hello World!”。
? Pascal程序:
Program ex11;
Begin
? Writeln(‘Hello World!’);
? ReadLn;
End.
?????? 這個(gè)簡(jiǎn)單樣例程序,希望大家的程序設(shè)計(jì)學(xué)習(xí)能有一個(gè)良好的開(kāi)端。程序中的Writeln是一個(gè)輸出語(yǔ)句,它能命令計(jì)算機(jī)在屏幕上輸出相應(yīng)的內(nèi)容,而緊跟Writeln語(yǔ)句后是一對(duì)圓括號(hào),其中用單引號(hào)引起的部分將被原原本本地顯示出來(lái)。
[例1.2]已知一輛自行車(chē)的售價(jià)是300元,請(qǐng)編程計(jì)算a輛自行車(chē)的總價(jià)是多少?
解:若總售價(jià)用m來(lái)表示,則這個(gè)問(wèn)題可分為以下幾步處理:
?= 1 \* GB3 ①?gòu)逆I盤(pán)輸入自行車(chē)的數(shù)目a;
?= 2 \* GB3 ②用公式? m=300*a? 計(jì)算總售價(jià);
?= 3 \* GB3 ③輸出計(jì)算結(jié)果。
Pascal程序:
? Program Ex12;?????????????????????????????? {程序首部}
? Var a,m : integer;????????????????????????????? {說(shuō)明部分}
? Begin???????????????????????????????????????????????????? {語(yǔ)句部分}
??? Write(‘a=’);
??? ReadLn(a);????????????????????????????????????????? {輸入自行車(chē)數(shù)目}
??? M := 300*a;??????????????????????????????????????? {計(jì)算總售價(jià)}
??? Writeln(‘M=’,m);???????????????????????????????? {輸出總售價(jià)}
??? ReadLn;????????????????????????????????????????????? {等待輸入回車(chē)鍵}
? End.
此題程序結(jié)構(gòu)完整,從中可看出一個(gè)Pascal 程序由三部分組成:
(1)程序首部
由保留字Program開(kāi)頭,后面跟一個(gè)程序名(如:Exl1);其格式為:
???????????? Program? 程序名;
程序名由用戶(hù)自己取,它的第一個(gè)字符必須是英文字母,其后的字符只能是字母或數(shù)字和下劃線(xiàn)組成,程序名中不能出現(xiàn)運(yùn)算符、標(biāo)點(diǎn)符和空格。