遼師大版信息技術(shù)九年P(guān)ascel語言基礎(chǔ)p

Pascal語言程序設(shè)計(jì)基礎(chǔ)程序=計(jì)計(jì)算機(jī)語語言+數(shù)數(shù)據(jù)結(jié)構(gòu)構(gòu)+算法法PascalConstpi=3.14159;Vars,r:real;beginreadln((r));s:=pi**r**r;writeln(‘s=‘,,s));end..{程序首首部}{程序體體}ProgramArea((input,,output);;{說明部部分}{執(zhí)行部部分}例：計(jì)算算半徑為為R的圓圓面積SPascal符號保留字：：（關(guān)鍵字字）預(yù)定義標(biāo)標(biāo)識符標(biāo)準(zhǔn)常量量：FLASE、MAXINT、TRUE標(biāo)準(zhǔn)類型型：BOOLEAN、、CHAR、REAL標(biāo)準(zhǔn)函數(shù)數(shù)：ABS、CHR、、COS標(biāo)準(zhǔn)過程程：DISPOSE、、GET標(biāo)準(zhǔn)文件件：INPUT、OUTPUT用戶標(biāo)識識符在Pascal語言中中具有特特定的含含義選用的表表識符不不能和保保留字相相同。有效長度度為63個字符符，并且且大小寫寫等效。。標(biāo)識符必必須是以字母開開頭的字母、、數(shù)字、、下劃線線序列。。判斷：a_1a--178tMax9_ahi.a數(shù)據(jù)類型型基本簡單單類型標(biāo)準(zhǔn)類型型用戶自定定義類型型實(shí)數(shù)類型型整數(shù)類型型字符類型型布爾類型型枚舉類型型子界類型型順序類型型構(gòu)造（復(fù)復(fù)雜）類類型數(shù)組類型型集合類型型記錄類型型文件類型型指針類型型類型數(shù)數(shù)值值范圍占占字字節(jié)數(shù)格格式式shortint--128~1281帶帶符符號8位位（短整型型）integer-32768~~327672帶帶符號16位（整型））longint-2147483648~4帶帶符號32位（長整型型）2147483647byte0~2551帶帶符符號8位位（字節(jié)型型）word0~655352帶帶符符號16位（字類型型）1、整型型Pascal規(guī)規(guī)定了兩兩個預(yù)定定義整型型常量標(biāo)標(biāo)識符maxint和和maxlonint，他們們各表示示確定的的常數(shù)值值maxint為為32767maxlongint為2147483647他們的類類型分別別是integer和和longint類型數(shù)數(shù)值范圍圍占占字字節(jié)數(shù)有有效位位數(shù)real2..9e--39...1..7e38611...12基本實(shí)型型Single1..5e--45...3..4e3847...8單精度實(shí)實(shí)型double5..0e--324..1.7e308815..16雙精度實(shí)實(shí)型2、實(shí)型型一個實(shí)型型數(shù)據(jù)用用來存放放實(shí)數(shù)。。3、字符符型標(biāo)識符：：char字符型必必須用單引號括起來字母作為為字符型型時，大大小寫是是不等價價的字符型只只允許單單引號中中有一個個字符，，否則就是是字符串串。比較大小?。骸瓵’(())‘a(chǎn)’’一個布爾爾型數(shù)據(jù)據(jù)用來存存放邏輯輯值（布布爾值））。4、布爾爾型布爾型的的值：false（0）和true（1））；boolean是布爾爾型的標(biāo)標(biāo)識符。。false和和true都是是預(yù)定義義常數(shù)標(biāo)標(biāo)識符，，分別表示示邏輯假假和邏輯輯真。true>false。abNOTaNOTbaANDbaORbaxorbTrueTrueFalseFalseTrueTruefalseTrueFalseFalseTrueFalseTruetrueFalseTrueTrueFalseFalseTruetrueFalseFalseTrueTrueFalseFalsefalse布爾運(yùn)算算的運(yùn)算算次序：：NOTANDXOR、OR例1：（（第11屆NOIP））設(shè)A＝＝true，B＝false，C＝＝false,,D=true，，以下邏邏輯運(yùn)算算表達(dá)式式值為真真的是（（））A.((A∧∧B)∨∨(C∧∧D))B.((((A∧B)∨C)∧∧DA∧(((B∨∨C)))∧∧DD.((A∧∧((B∨∨C)))∨∨DE.((A∨∨B))∧((C∧∧D)例2（第9屆屆NOIP）設(shè)設(shè)A＝true，B＝＝false，，C＝true，D==true，邏邏輯運(yùn)算算表達(dá)式式A∧B∨∨C∧∧D的的值是（（））二進(jìn)制的的邏輯運(yùn)運(yùn)算二進(jìn)制數(shù)數(shù)1和0在邏輯輯上可以以代表““真”與與“假””、“是是”與““否”、、“有””與“無無”。1、邏輯輯加法（（“或””運(yùn)算））邏輯加法法通常用用符號““+”或或“∨””來表示示。邏輯輯加法運(yùn)運(yùn)算規(guī)則則如下：：0+0==0，0∨0=00+1==1，0∨1=11+0==1，1∨0=11+1==1，1∨1=12、邏輯輯乘法（（“與””運(yùn)算））邏輯乘法法通常用用符號““×”或或“∧””或“··”來表表示。邏邏輯乘法法運(yùn)算規(guī)規(guī)則如下下：0×0==0，0∧0=0，，0··0=00×1==0，0∧1=0，，0··1=01×0==0，1∧0=0，，1··0=01×1==1，1∧1=1，，1··1=13、邏輯輯否定（（非運(yùn)算算）邏輯非運(yùn)運(yùn)算又稱稱邏輯否否運(yùn)算。。其運(yùn)算算規(guī)則為為：0=1非非0等于11=0非非1等于0

4、異或或邏輯運(yùn)運(yùn)算（半半加運(yùn)算算）異或運(yùn)算算通常用用符號""⊕"表表示，其其運(yùn)算規(guī)規(guī)則為：：0⊕0==00同0異異或，結(jié)結(jié)果為00⊕1==10同1異異或，結(jié)結(jié)果為11⊕0==11同0異異或，結(jié)結(jié)果為11⊕1==01同1異異或，結(jié)結(jié)果為0即兩個邏邏輯變量量相異，，輸出才才為1練習(xí)：1、1010111∧∧10011101=書本P11-N152、10101010∨01100110=3、10101100=4、10101010⊕00001111=試一試：：1、請模模仿寫出出一個Pascal程程序以實(shí)實(shí)現(xiàn)計(jì)算算梯形面面積。假假設(shè)梯形形上底a＝5，，下底b＝10，高h(yuǎn)＝6。。2、給出出半徑R＝100，求求圓周長長、圓面面積。3、一個個學(xué)生五五門課的的成績?yōu)闉椋?0、89、65、100、78。編編PASCAL程序，，輸出平平均成績績。一、常量量1、常量量定義2、定義義常量的的語法格格式CONST<常量標(biāo)標(biāo)識符>>=<常常量>;;……<常量標(biāo)標(biāo)識符>>=<常常量>;;3、類型型（1）數(shù)數(shù)n＝＝100（2）字字符ch＝＝’*’’（3）字字符串串str＝’Hangzhou’（4）布布爾值flag＝＝True二、變量量1、變量量定義2、變量量說明部部分的語語法格式式VAR<變量標(biāo)標(biāo)識符表表>:<<數(shù)據(jù)類類型>;;……<變量標(biāo)標(biāo)識符表表>:<<數(shù)據(jù)類類型>;;Varbeginread(a,,b);;c:=a*b;;d:=a/b;;writeln(c));writeln(d));End..?例:輸入:兩兩個整數(shù)數(shù)a、b(<==3000)，，輸出它它們的乘乘積c，，商d。。a,b::integer;C:longint;;d:real;;三、標(biāo)準(zhǔn)準(zhǔn)函數(shù)1、算術(shù)術(shù)函數(shù)函數(shù)標(biāo)識識符自自變量量類型意意義結(jié)結(jié)果果類型abs整整型、、實(shí)型絕絕對值值同同自自變量exp整整型、、實(shí)型指指數(shù)實(shí)實(shí)型型ln整整型、、實(shí)型自自然對對數(shù)實(shí)實(shí)型型int整整型型、實(shí)型型整整數(shù)數(shù)部分實(shí)實(shí)型frac整整型、實(shí)實(shí)型小小數(shù)部分分實(shí)實(shí)型arctan整整型、實(shí)實(shí)型反反正切實(shí)實(shí)型sin整整型型、實(shí)型型正正弦弦實(shí)實(shí)型cos整整型、、實(shí)型余余弦實(shí)實(shí)型型sqr整整型、、實(shí)型平平方同同自自變量sqrt整整型、、實(shí)型平平方根根實(shí)實(shí)型型練習(xí)abs((-4))=abs((-7..49))=frac(-3.71)=int((-3..71))=sqr((4)==sqrt(4))=函數(shù)標(biāo)識識符自自變量類類型意意義結(jié)結(jié)果類類型odd((x)整整型判判斷奇奇數(shù)布布爾型型

pred((x)順順序類類型求求前趨趨同同自變變量succ(x))順順序類型型求求后繼同同自變量量例：odd(1000)=falsepred(2000))=1999succ(2000))=2001odd(3))=pred(‘x’)==succ('x')==2、標(biāo)量量函數(shù)函數(shù)標(biāo)識識符自自變量類類型意意義結(jié)結(jié)果果類型chr((x)byte自自變量對對應(yīng)的字字符字字符符型ord((x)順順序序類型自自變量量對應(yīng)的的序號longintround(x)實(shí)實(shí)型四四舍五五入longinttrunc(x)實(shí)實(shí)型截截?cái)嗳∪≌鹟ongint例：chr(66)==‘B’’ord(‘‘A’))=65round(--4.3)=--5trunc((2.88)==23、轉(zhuǎn)換換函數(shù)4、雜類類函數(shù)：：Random：：0，1之間的的隨機(jī)實(shí)實(shí)數(shù)Random((x)：：0，x之間的的隨機(jī)整整數(shù)Randomize：：初始化化內(nèi)部隨隨機(jī)數(shù)產(chǎn)產(chǎn)生器Upcase((x)：：使小寫寫英文字字母變成成大寫四、Pascal運(yùn)算算符(2)邏邏輯運(yùn)算算符運(yùn)運(yùn)算符運(yùn)運(yùn)算算運(yùn)運(yùn)算對象象結(jié)結(jié)果類類型not邏邏輯非布布爾爾型布布爾型and邏邏輯與布布爾爾型布布爾型or邏邏輯輯或布布爾型型布布爾型xor邏邏輯異異或布布爾型布布爾爾型(1)運(yùn)運(yùn)算符+--**//divmod(3)關(guān)關(guān)系運(yùn)運(yùn)算符運(yùn)運(yùn)算符符運(yùn)運(yùn)算算運(yùn)運(yùn)算算對象結(jié)結(jié)果類型型==等等于于簡簡單類型型布布爾型<<>>不不等等于簡簡單類類型布布爾型型<<小小于于簡簡單類型型布布爾型>>大大于簡簡單單類型布布爾爾型<<=小小于等等于簡簡單類型型布布爾型>>==大大于于等于簡簡單類類型布布爾型型優(yōu)先級運(yùn)算符優(yōu)優(yōu)先先級not1(高))

*,,/,,div,,mod,,and2xor,++,,-,,or3in,==,<,,>,>>=,<<=,<<>4((低)練習(xí)：求下列表表達(dá)式的的值：20mod1915mod97div819div3(4>5)and((7<8))(8>9)or

(9<10)(2>3)and((((3=3)or((3<7))13-2*3DIV4MOD2五、Pascal表達(dá)達(dá)式1、算術(shù)術(shù)表達(dá)式式：3..1415929X2**pi*r2、字符符表達(dá)式式：’A’CHR((65))3、關(guān)系系表達(dá)式式：a++b<c4、布爾爾表達(dá)式式：ROUND(a－－b)>>10算術(shù)表達(dá)達(dá)式1、定義義：由符符合PASCAL語法法規(guī)定的的數(shù)值型型運(yùn)算對對象（包括數(shù)數(shù)值型的的常量、、變量、、函數(shù)））、運(yùn)算算符、圓括括號組成成的有意意義的式式子。2、算術(shù)術(shù)運(yùn)算符符：+、、-、**、/、、DIV、MOD3、運(yùn)算算次序：：（1）圓圓括號（（）（2）函函數(shù)（3）**、/、、DIV、MOD（4）++、-同一級別別的運(yùn)算算符，按按在表達(dá)達(dá)式中次次序“先先左后右右”的原原則算術(shù)表達(dá)達(dá)式例1：將將下列的的數(shù)學(xué)表表達(dá)式改改寫成PASCAL表表達(dá)式：：b^2--4ac例2：n為四位位數(shù)。請請運(yùn)用算算術(shù)表達(dá)達(dá)式分離離出它的的個、十十、百、、千位nMOD10---（個位位數(shù)）（nMOD100）DIV10---（十位位數(shù)）（nMOD1000）DIV100--（（百位數(shù)數(shù)）nDIV1000---（千位位數(shù)）下面的程程序執(zhí)行行后，變變量b、、c、d的值值是多少少？Programpl(input,output));Consta=256;Varb,d::integer;c:real;;beginb:=adiv16;c:=a/b;;d:=a;end..作業(yè):寫出下面面運(yùn)算的的結(jié)果（注意類型型）1、5**3*6DIV22、8//4*2.5//1.25*（（3.7+2..3）3、18DIV4*sqr((4.0)/1.64、25DIV3MOD3*Trunc（（2.5）5、8MOD(-16MOD3)**66、5DIV3//Ord(pred((‘C’’))**Trunc((7.5*6..3)*Round((7.5-6..3)注：MOD函數(shù)數(shù)按“求求余”運(yùn)運(yùn)算，Ord((‘A’’)=65六、PASCAL語言言的語句句語句基本語句句賦值語句句過程語句句讀語句寫語句其他過程程語句轉(zhuǎn)移語句句空語句構(gòu)造型語語句復(fù)合語句句條件語句句分情況語語句如果語句句重復(fù)語句句當(dāng)語句直到語句句循環(huán)語句句開域語句句1、賦值值語句格式：<變量名名>:=<變量名名>注意：:=是是賦值值號，在在書寫時時中間不不能加空空格。賦值語句句的執(zhí)行行是：先先計(jì)算（（表達(dá)式式的值）），后賦賦值如：A：：=（9*8））-（2-1））;A:=A+1注意:a，b::integer；——是一一個說明明語句。?！埃骸薄笔亲兞苛勘砗妥冏兞款愋托偷姆指舾舴鸻=b——是一一個表達(dá)達(dá)式。它它的值是是一個布布爾類型型的量：：TRUE或FALSEa:=3；——是是一個賦賦值語句句。把整整型常量量值3賦賦給整型型變量a寫出下列列程序運(yùn)運(yùn)行后，，變量a、b的的值Programp2(input,output);;Vara，b::integer;begina:=3;b:=a;b:=a+1;;a:=a+1;;b:=b+1;;end..2、寫語語句－－－輸出語語句功能：寫（write）語句句是Pascal中唯唯一能將運(yùn)算結(jié)結(jié)果送出出顯示在在顯示器器屏幕的語句。。格式：write(輸輸出量表表)；{輸出后后不換行行}writeln(輸出出量表))；{輸出后后換行}}writeln；{輸出一一個回車車符}write(1,2,,3,4);write(5,6));輸出為：：123456Write語句句與writeln語語句的區(qū)區(qū)別:write語句句將其后后括號中中的表達(dá)達(dá)式一個個接一個個輸出后后，沒有換行行。而writeln語句句則在輸輸出各個個表達(dá)式式的值后后換行。writeln(1,,2,3,4));write(5,6));輸出為：：123456例如以下下兩個程程序段的的輸出分分別為：：注意：場場寬的限限制在輸輸出不同同格式的的數(shù)值時時的作用用：例2：實(shí)實(shí)型數(shù)據(jù)據(jù)小數(shù)位位數(shù)的確確定。vara:real;begina:=15/8;writeln(a));{輸出1.8750000000E+00}wiiteln(a::0:2);{輸出1.88整整數(shù)部分分按實(shí)際際位數(shù)輸輸出，小小數(shù)部分分保留兩兩位小數(shù)數(shù)，末位位四舍五五入.}}writeln(a::0:0):{輸出2只只輸出整整數(shù)部分分，小數(shù)數(shù)部分四四舍五入入}end..例1：數(shù)數(shù)據(jù)項(xiàng)間間隔。如輸出最最多四位位的數(shù)據(jù)據(jù)：write(x::5)。。則數(shù)據(jù)據(jù)間至少少分隔一一個空格格。寫出輸出出結(jié)果consta=10;b=20;beginwriteln(50);write(a:3));writeln(a++b:4);writeln(‘a(chǎn)+b==’,a+b));end..3、讀語語句－－－輸入語語句格式：read(<輸輸出項(xiàng)表表>)；；--讀讀入不換換行readln((<輸輸出項(xiàng)表表>)；；--讀讀入換行行readln；；read后一一定要有有參數(shù)表表；readln可可以不帶帶參數(shù)表表,即可可以沒有有任何輸輸入項(xiàng),,只是是等待讀讀入一個個換行符符(回車車)。經(jīng)經(jīng)常用于于暫停程程序的運(yùn)運(yùn)行，直直到輸入入一個回回車注意：寫在括