Pascal語言程序設(shè)計基礎(chǔ)Pascal語言程序設(shè)計基礎(chǔ)1

程序=計算機語言+數(shù)據(jù)結(jié)構(gòu)+算法PascalPascal2Constpi=3.14159;Vars,r:real;beginreadln(r);s:=pi*r*r;writeln(‘s=‘,s);end.{程序首部}{程序體}ProgramArea(input,output);{說明部分}{執(zhí)行部分}例：計算半徑為R的圓面積SConstpi=3.14159;{程序首部}{程序體}Pr3Pascal符號保留字：（關(guān)鍵字）預(yù)定義標(biāo)識符標(biāo)準(zhǔn)常量：FLASE、MAXINT、TRUE標(biāo)準(zhǔn)類型：BOOLEAN、CHAR、REAL標(biāo)準(zhǔn)函數(shù)：ABS、CHR、COS標(biāo)準(zhǔn)過程：DISPOSE、GET標(biāo)準(zhǔn)文件：INPUT、OUTPUT用戶標(biāo)識符在Pascal語言中具有特定的含義選用的表識符不能和保留字相同。有效長度為63個字符，并且大小寫等效。Pascal保留字：預(yù)定義標(biāo)識符標(biāo)準(zhǔn)常量：FLASE、M4標(biāo)識符必須是以字母開頭的字母、數(shù)字、下劃線序列。判斷：a_1a-178tMax9_ahi.a

標(biāo)識符必須是以字母開頭的字母、數(shù)字、下劃線序列。判斷：5數(shù)據(jù)類型基本簡單類型標(biāo)準(zhǔn)類型用戶自定義類型實數(shù)類型整數(shù)類型字符類型布爾類型枚舉類型子界類型順序類型構(gòu)造（復(fù)雜）類型數(shù)組類型集合類型記錄類型文件類型指針類型數(shù)據(jù)類型基本簡單類型標(biāo)準(zhǔn)類型用戶自定義類型實數(shù)類型整數(shù)類型字6類型數(shù)值范圍占字節(jié)數(shù)格式shortint-128~1281

帶符號8位（短整型）integer-32768~327672

帶符號16位（整型）longint-2147483648~4帶符號32位

（長整型）2147483647

byte0~2551帶符號8位（字節(jié)型）word0~655352帶符號16位（字類型）1、整型1、整型7Pascal規(guī)定了兩個預(yù)定義整型常量標(biāo)識符maxint和maxlonint，他們各表示確定的常數(shù)值

maxint為32767maxlongint為2147483647他們的類型分別是integer和longintPascal規(guī)定了兩個預(yù)定義整型常量標(biāo)識符maxint和ma8類型數(shù)值范圍占字節(jié)數(shù)有效位數(shù)real2.9e-39..1.7e38611..12基本實型Single1.5e-45..3.4e3847..8單精度實型double5.0e-324..1.7e308815..16雙精度實型2、實型一個實型數(shù)據(jù)用來存放實數(shù)。類型數(shù)值范圍93、字符型標(biāo)識符：char字符型必須用單引號括起來字母作為字符型時，大小寫是不等價的字符型只允許單引號中有一個字符，否則就是字符串。比較大?。骸瓵’()‘a(chǎn)’3、字符型標(biāo)識符：char字符型必須用單引號括起來字母作為字10一個布爾型數(shù)據(jù)用來存放邏輯值（布爾值）。4、布爾型布爾型的值：false（0）和true（1）；boolean是布爾型的標(biāo)識符。false和true都是預(yù)定義常數(shù)標(biāo)識符，分別表示邏輯假和邏輯真。true>false。一個布爾型數(shù)據(jù)用來存放邏輯值（布爾值）。4、布爾型布爾11abNOTaNOTbaANDbaORbaxorbTrueTrueFalseFalseTrueTruefalseTrueFalseFalseTrueFalseTruetrueFalseTrueTrueFalseFalseTruetrueFalseFalseTrueTrueFalseFalsefalse布爾運算的運算次序：NOTANDXOR、ORabNOTaNOTbaANDbaORbaxor12例1：（第11屆NOIP）設(shè)A＝true，B＝false，C＝false,D=true，以下邏輯運算表達(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è)A＝true，B＝false，C＝true，D=true，邏輯運算表達(dá)式A∧B∨C∧D的值是（）例1：（第11屆NOIP）設(shè)A＝true，B＝false，C13二進(jìn)制的邏輯運算二進(jìn)制數(shù)1和0在邏輯上可以代表“真”與“假”、“是”與“否”、“有”與“無”。1、邏輯加法（“或”運算）邏輯加法通常用符號“+”或“∨”來表示。邏輯加法運算規(guī)則如下：0+0=0，0∨0=00+1=1，0∨1=11+0=1，1∨0=11+1=1，1∨1=1二進(jìn)制的邏輯運算二進(jìn)制數(shù)1和0在邏輯上可以代表“真”與“假”142、邏輯乘法（“與”運算）邏輯乘法通常用符號“×”或“∧”或“·”來表示。邏輯乘法運算規(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=12、邏輯乘法（“與”運算）153、邏輯否定（非運算）邏輯非運算又稱邏輯否運算。其運算規(guī)則為：0=1非0等于11=0非1等于0

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

函數(shù)標(biāo)識符自變量類型意義結(jié)果類型

abs整型、實型絕對值同自變量

exp整型、實型指數(shù)實型

ln整型、實型自然對數(shù)實型

int整型、實型整數(shù)部分實型

frac整型、實型小數(shù)部分實型

arctan整型、實型反正切實型

sin整型、實型正弦實型cos整型、實型余弦實型

sqr整型、實型平方同自變量

sqrt整型、實型平方根實型三、標(biāo)準(zhǔn)函數(shù)1、算術(shù)函數(shù)

函數(shù)標(biāo)識符自變量類型意23練習(xí)abs(-4)=abs(-7.49)=frac(-3.71)=int(-3.71)=sqr(4)=sqrt(4)=練習(xí)abs(-4)=24函數(shù)標(biāo)識符自變量類型意義結(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é)果類型25函數(shù)標(biāo)識符自變量類型意義結(jié)果類型

chr(x)byte自變量對應(yīng)的字符字符型ord(x)順序類型自變量對應(yīng)的序號longintround(x)實型四舍五入longinttrunc(x)實型截斷取整longint

例：chr(66)=‘B’ord(‘A’)=65round(-4.3)=-5trunc(2.88)=23、轉(zhuǎn)換函數(shù)函數(shù)標(biāo)識符自變量類型意義264、雜類函數(shù)：Random：0，1之間的隨機實數(shù)Random(x)：0，x之間的隨機整數(shù)Randomize：初始化內(nèi)部隨機數(shù)產(chǎn)生器Upcase(x)：使小寫英文字母變成大寫4、雜類函數(shù)：27四、Pascal運算符(2)邏輯運算符

運算符運算運算對象結(jié)果類型

not邏輯非布爾型布爾型

and邏輯與布爾型布爾型

or邏輯或布爾型布爾型

xor邏輯異或布爾型布爾型(1)運算符

+-*/divmod四、Pascal運算符(2)邏輯運算符

運算符運算28(3)關(guān)系運算符

運算符運算運算對象結(jié)果類型

=等于簡單類型布爾型

<>不等于簡單類型布爾型

<小于簡單類型布爾型

>大于簡單類型布爾型

<=小于等于簡單類型布爾型

>=大于等于簡單類型布爾型(3)關(guān)系運算符

運算符運算運算對象29優(yōu)先級

運算符優(yōu)先級

not1(高)

*,/,div,mod,and2

xor,+,-,or3

in,=,<,>,>=,<=,<>4(低)優(yōu)先級

運算符優(yōu)先級

n30練習(xí)：求下列表達(dá)式的值：

20mod19

15mod9

7div8

19div3

(4>5)

and

(7<8)

(8>9)

or

(9<10)

(2>3)

and

((3=3)

or

(3<7))13-2*3DIV4MOD2練習(xí)：31五、Pascal表達(dá)式1、算術(shù)表達(dá)式：3.1415929X2*pi*r2、字符表達(dá)式：’A’CHR(65)3、關(guān)系表達(dá)式：a+b<c4、布爾表達(dá)式：ROUND(a－b)>10五、Pascal表達(dá)式1、算術(shù)表達(dá)式：3.141592932算術(shù)表達(dá)式1、定義：由符合PASCAL語法規(guī)定的數(shù)值型運算對象（包括數(shù)值型的常量、變量、函數(shù)）、運算符、圓括號組成的有意義的式子。2、算術(shù)運算符：+、-、*、/、DIV、MOD算術(shù)表達(dá)式1、定義：由符合PASCAL語法規(guī)定的數(shù)值型運算對333、運算次序：（1）圓括號（）（2）函數(shù)（3）*、/、DIV、MOD（4）+、-同一級別的運算符，按在表達(dá)式中次序“先左后右”的原則算術(shù)表達(dá)式例1：將下列的數(shù)學(xué)表達(dá)式改寫成PASCAL表達(dá)式：

b^2-4ac

3、運算次序：算術(shù)表達(dá)式例1：將下列的數(shù)學(xué)表達(dá)式改寫成PAS34例2：n為四位數(shù)。請運用算術(shù)表達(dá)式分離出它的個、十、百、千位nMOD10--（個位數(shù)）（nMOD100）DIV10--（十位數(shù)）（nMOD1000）DIV100--（百位數(shù)）nDIV1000--（千位數(shù)）例2：n為四位數(shù)。請運用算術(shù)表達(dá)式分離出它的個、十、百、千位35下面的程序執(zhí)行后，變量b、c、d的值是多少？Programpl(input,output);Consta=256;Varb,d:integer;c:real;beginb:=adiv16;c:=a/b;d:=a;end.下面的程序執(zhí)行后，變量b、c、d的值是多少？Program36作業(yè):寫出下面運算的結(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ù)按“求余”運算，Ord(‘A’)=65作業(yè):寫出下面運算的結(jié)果（注意類型）注：MOD函數(shù)按“求余”37六、PASCAL語言的語句語句基本語句賦值語句過程語句讀語句寫語句其他過程語句轉(zhuǎn)移語句空語句構(gòu)造型語句復(fù)合語句條件語句分情況語句如果語句重復(fù)語句當(dāng)語句直到語句循環(huán)語句開域語句六、PASCAL語言的語句語句基本語句賦值語句過程語句讀語句381、賦值語句格式：<變量名>:=<變量名>注意：:=是賦值號，在書寫時中間不能加空格。賦值語句的執(zhí)行是：先計算（表達(dá)式的值），后賦值如：A：=（9*8）-（2-1）;

A:=A+1

1、賦值語句格式：注意：如：A：=（9*8）-（2-1）;39注意:

a，b:integer；——是一個說明語句。“：”是變量表和變量類型的分隔符

a=b——是一個表達(dá)式。它的值是一個布爾類型的量：TRUE或FALSE

a:=3；——是一個賦值語句。把整型常量值3賦給整型變量a

注意:40寫出下列程序運行后，變量a、b的值Programp2(input,output);Vara，b:integer;begina:=3;

b:=a;b:=a+1;a:=a+1;b:=b+1;end.寫出下列程序運行后，變量a、b的值Programp2(in412、寫語句－－輸出語句功能：寫（write）語句是Pascal中唯一能將運算結(jié)果送出顯示在顯示器屏幕的語句。格式：

write(輸出量表)；{輸出后不換行}

writeln(輸出量表)；{輸出后換行}

writeln；{輸出一個回車符}

2、寫語句－－輸出語句功能：42write(1,2,3,4);write(5,6);輸出為：123456Write語句與writeln語句的區(qū)別:write語句將其后括號中的表達(dá)式一個接一個輸出后，沒有換行。而writeln語句則在輸出各個表達(dá)式的值后換行。writeln(1,2,3,4);write(5,6);輸出為：123456例如以下兩個程序段的輸出分別為：write(1,2,3,4);Write語句與writeln43注意：場寬的限制在輸出不同格式的數(shù)值時的作用：

例2：實型數(shù)據(jù)小數(shù)位數(shù)的確定。

vara:real;

begin

a:=15/8;

writeln(a);{輸出1.8750000000E+00}

wiiteln(a:0:2);{輸出1.88整數(shù)部分按實際位數(shù)輸出，小數(shù)部分保留兩位小數(shù)，末位四舍五入.}

writeln(a:0:0):{輸出2只輸出整數(shù)部分，小數(shù)部分四舍五入}

end.

例1：數(shù)據(jù)項間隔。

如輸出最多四位的數(shù)據(jù)：write(x:5)。則數(shù)據(jù)間至少分隔一個空格。

注意：場寬的限制在輸出不同格式的數(shù)值時的作用：

例2：實型數(shù)44寫出輸出結(jié)果consta=10;b=20;beginwriteln(50);

write(a:3);writeln(a+b:4);writeln(‘a(chǎn)+b=’,a+b);end.寫出輸出結(jié)果constwrite(a:3);453、讀語句－－輸入語句格式：read(<輸出項表>)；--讀入不換行readln(<輸出項表>)；--讀入換行readln；read后一定要有參數(shù)表；readln可以不帶參數(shù)表,即可以沒有任何輸入項,只是等待讀入一個換行符(回車)。經(jīng)常用于暫停程序的運行，直到輸入一個回車3、讀語句－－輸入語句格式：read后一定要有參數(shù)表；46注意：寫在括號中的變量，都要在變量說明中先預(yù)以說明；變量與變量之間，以“,”分隔；

例：

vara,b:integer;

read(a,b);

注意：47read與readln的區(qū)別

例：有兩段程序有相同的變量說明如下，不同的讀語句。

變量說明vara,b,c,d:integer；執(zhí)行結(jié)果abcd程序段一read(a);

readln(b,c);

read(d);

1236程序段二readln(a);

read(b,c);

read(d)1678輸入數(shù)據(jù)12345

678read與readln的區(qū)別

變量說明vara,48寫出下面程序的運算結(jié)果。Programp8(input,output);vara,b,c:integer;beginwriteln(‘請輸入兩個數(shù)：’);read(a,b);c:=a;a:=b;b:=c;writeln(a:5,b:5);end.輸入：58寫出下面程序的運算結(jié)果。Programp8(input,o49作業(yè)：編寫程序1、輸入一個三位自然數(shù)，分離出它的百位、十位與個位上的數(shù)字，并逆序變成一個新的三位數(shù)輸出。2、輸入一個華氏溫度，要求將其轉(zhuǎn)換成攝氏溫度。公式為C＝5/9（F-32），其中F是華氏溫度，C是攝氏溫度。3、輸入a，b兩個整數(shù)，要求輸出a除以b得到的商和余數(shù)。（商保留兩位小數(shù)，場寬為5）4、火車作直線加速運動，已知初速V0＝0，加速度a＝0.1米/秒2，求t＝10分鐘時火車速度（以公里/小時表示），取兩位小數(shù)。公式：Vt=V0+at作業(yè)：編寫程序1、輸入一個三位自然數(shù)，分離出它的百位、十位與50遼師大版信息技術(shù)九年P(guān)ascel語言基礎(chǔ)p課件51Pascal語言程序設(shè)計基礎(chǔ)Pascal語言程序設(shè)計基礎(chǔ)52

程序=計算機語言+數(shù)據(jù)結(jié)構(gòu)+算法PascalPascal53Constpi=3.14159;Vars,r:real;beginreadln(r);s:=pi*r*r;writeln(‘s=‘,s);end.{程序首部}{程序體}ProgramArea(input,output);{說明部分}{執(zhí)行部分}例：計算半徑為R的圓面積SConstpi=3.14159;{程序首部}{程序體}Pr54Pascal符號保留字：（關(guān)鍵字）預(yù)定義標(biāo)識符標(biāo)準(zhǔn)常量：FLASE、MAXINT、TRUE標(biāo)準(zhǔn)類型：BOOLEAN、CHAR、REAL標(biāo)準(zhǔn)函數(shù)：ABS、CHR、COS標(biāo)準(zhǔn)過程：DISPOSE、GET標(biāo)準(zhǔn)文件：INPUT、OUTPUT用戶標(biāo)識符在Pascal語言中具有特定的含義選用的表識符不能和保留字相同。有效長度為63個字符，并且大小寫等效。Pascal保留字：預(yù)定義標(biāo)識符標(biāo)準(zhǔn)常量：FLASE、M55標(biāo)識符必須是以字母開頭的字母、數(shù)字、下劃線序列。判斷：a_1a-178tMax9_ahi.a

標(biāo)識符必須是以字母開頭的字母、數(shù)字、下劃線序列。判斷：56數(shù)據(jù)類型基本簡單類型標(biāo)準(zhǔn)類型用戶自定義類型實數(shù)類型整數(shù)類型字符類型布爾類型枚舉類型子界類型順序類型構(gòu)造（復(fù)雜）類型數(shù)組類型集合類型記錄類型文件類型指針類型數(shù)據(jù)類型基本簡單類型標(biāo)準(zhǔn)類型用戶自定義類型實數(shù)類型整數(shù)類型字57類型數(shù)值范圍占字節(jié)數(shù)格式shortint-128~1281

帶符號8位（短整型）integer-32768~327672

帶符號16位（整型）longint-2147483648~4帶符號32位

（長整型）2147483647

byte0~2551帶符號8位（字節(jié)型）word0~655352帶符號16位（字類型）1、整型1、整型58Pascal規(guī)定了兩個預(yù)定義整型常量標(biāo)識符maxint和maxlonint，他們各表示確定的常數(shù)值

maxint為32767maxlongint為2147483647他們的類型分別是integer和longintPascal規(guī)定了兩個預(yù)定義整型常量標(biāo)識符maxint和ma59類型數(shù)值范圍占字節(jié)數(shù)有效位數(shù)real2.9e-39..1.7e38611..12基本實型Single1.5e-45..3.4e3847..8單精度實型double5.0e-324..1.7e308815..16雙精度實型2、實型一個實型數(shù)據(jù)用來存放實數(shù)。類型數(shù)值范圍603、字符型標(biāo)識符：char字符型必須用單引號括起來字母作為字符型時，大小寫是不等價的字符型只允許單引號中有一個字符，否則就是字符串。比較大?。骸瓵’()‘a(chǎn)’3、字符型標(biāo)識符：char字符型必須用單引號括起來字母作為字61一個布爾型數(shù)據(jù)用來存放邏輯值（布爾值）。4、布爾型布爾型的值：false（0）和true（1）；boolean是布爾型的標(biāo)識符。false和true都是預(yù)定義常數(shù)標(biāo)識符，分別表示邏輯假和邏輯真。true>false。一個布爾型數(shù)據(jù)用來存放邏輯值（布爾值）。4、布爾型布爾62abNOTaNOTbaANDbaORbaxorbTrueTrueFalseFalseTrueTruefalseTrueFalseFalseTrueFalseTruetrueFalseTrueTrueFalseFalseTruetrueFalseFalseTrueTrueFalseFalsefalse布爾運算的運算次序：NOTANDXOR、ORabNOTaNOTbaANDbaORbaxor63例1：（第11屆NOIP）設(shè)A＝true，B＝false，C＝false,D=true，以下邏輯運算表達(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è)A＝true，B＝false，C＝true，D=true，邏輯運算表達(dá)式A∧B∨C∧D的值是（）例1：（第11屆NOIP）設(shè)A＝true，B＝false，C64二進(jìn)制的邏輯運算二進(jìn)制數(shù)1和0在邏輯上可以代表“真”與“假”、“是”與“否”、“有”與“無”。1、邏輯加法（“或”運算）邏輯加法通常用符號“+”或“∨”來表示。邏輯加法運算規(guī)則如下：0+0=0，0∨0=00+1=1，0∨1=11+0=1，1∨0=11+1=1，1∨1=1二進(jìn)制的邏輯運算二進(jìn)制數(shù)1和0在邏輯上可以代表“真”與“假”652、邏輯乘法（“與”運算）邏輯乘法通常用符號“×”或“∧”或“·”來表示。邏輯乘法運算規(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=12、邏輯乘法（“與”運算）663、邏輯否定（非運算）邏輯非運算又稱邏輯否運算。其運算規(guī)則為：0=1非0等于11=0非1等于0

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

函數(shù)標(biāo)識符自變量類型意義結(jié)果類型

abs整型、實型絕對值同自變量

exp整型、實型指數(shù)實型

ln整型、實型自然對數(shù)實型

int整型、實型整數(shù)部分實型

frac整型、實型小數(shù)部分實型

arctan整型、實型反正切實型

sin整型、實型正弦實型cos整型、實型余弦實型

sqr整型、實型平方同自變量

sqrt整型、實型平方根實型三、標(biāo)準(zhǔn)函數(shù)1、算術(shù)函數(shù)

函數(shù)標(biāo)識符自變量類型意74練習(xí)abs(-4)=abs(-7.49)=frac(-3.71)=int(-3.71)=sqr(4)=sqrt(4)=練習(xí)abs(-4)=75函數(shù)標(biāo)識符自變量類型意義結(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é)果類型76函數(shù)標(biāo)識符自變量類型意義結(jié)果類型

chr(x)byte自變量對應(yīng)的字符字符型ord(x)順序類型自變量對應(yīng)的序號longintround(x)實型四舍五入longinttrunc(x)實型截斷取整longint

例：chr(66)=‘B’ord(‘A’)=65round(-4.3)=-5trunc(2.88)=23、轉(zhuǎn)換函數(shù)函數(shù)標(biāo)識符自變量類型意義774、雜類函數(shù)：Random：0，1之間的隨機實數(shù)Random(x)：0，x之間的隨機整數(shù)Randomize：初始化內(nèi)部隨機數(shù)產(chǎn)生器Upcase(x)：使小寫英文字母變成大寫4、雜類函數(shù)：78四、Pascal運算符(2)邏輯運算符

運算符運算運算對象結(jié)果類型

not邏輯非布爾型布爾型

and邏輯與布爾型布爾型

or邏輯或布爾型布爾型

xor邏輯異或布爾型布爾型(1)運算符

+-*/divmod四、Pascal運算符(2)邏輯運算符

運算符運算79(3)關(guān)系運算符

運算符運算運算對象結(jié)果類型

=等于簡單類型布爾型

<>不等于簡單類型布爾型

<小于簡單類型布爾型

>大于簡單類型布爾型

<=小于等于簡單類型布爾型

>=大于等于簡單類型布爾型(3)關(guān)系運算符

運算符運算運算對象80優(yōu)先級

運算符優(yōu)先級

not1(高)

*,/,div,mod,and2

xor,+,-,or3

in,=,<,>,>=,<=,<>4(低)優(yōu)先級

運算符優(yōu)先級

n81練習(xí)：求下列表達(dá)式的值：

20mod19

15mod9

7div8

19div3

(4>5)

and

(7<8)

(8>9)

or

(9<10)

(2>3)

and

((3=3)

or

(3<7))13-2*3DIV4MOD2練習(xí)：82五、Pascal表達(dá)式1、算術(shù)表達(dá)式：3.1415929X2*pi*r2、字符表達(dá)式：’A’CHR(65)3、關(guān)系表達(dá)式：a+b<c4、布爾表達(dá)式：ROUND(a－b)>10五、Pascal表達(dá)式1、算術(shù)表達(dá)式：3.141592983算術(shù)表達(dá)式1、定義：由符合PASCAL語法規(guī)定的數(shù)值型運算對象（包括數(shù)值型的常量、變量、函數(shù)）、運算符、圓括號組成的有意義的式子。2、算術(shù)運算符：+、-、*、/、DIV、MOD算術(shù)表達(dá)式1、定義：由符合PASCAL語法規(guī)定的數(shù)值型運算對843、運算次序：（1）圓括號（）（2）函數(shù)（3）*、/、DIV、MOD（4）+、-同一級別的運算符，按在表達(dá)式中次序“先左后右”的原則算術(shù)表達(dá)式例1：將下列的數(shù)學(xué)表達(dá)式改寫成PASCAL表達(dá)式：

b^2-4ac

3、運算次序：算術(shù)表達(dá)式例1：將下列的數(shù)學(xué)表達(dá)式改寫成PAS85例2：n為四位數(shù)。請運用算術(shù)表達(dá)式分離出它的個、十、百、千位nMOD10--（個位數(shù)）（nMOD100）DIV10--（十位數(shù)）（nMOD1000）DIV100--（百位數(shù)）nDIV1000--（千位數(shù)）例2：n為四位數(shù)。請運用算術(shù)表達(dá)式分離出它的個、十、百、千位86下面的程序執(zhí)行后，變量b、c、d的值是多少？Programpl(input,output);Consta=256;Varb,d:integer;c:real;beginb:=adiv16;c:=a/b;d:=a;end.下面的程序執(zhí)行后，變量b、c、d的值是多少？Program87作業(yè):寫出下面運算的結(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ù)按“求余”運算，Ord(‘A’)=65作業(yè):寫出下面運算的結(jié)果（注意類型）注：MOD函數(shù)按“求余”88六、PASCAL語言的語句語句基本語句賦值語句過程語句讀語句寫語句其他過程語句轉(zhuǎn)移語句空語句構(gòu)造型語句復(fù)合語句條件語句分情況語句如果語句重復(fù)語句當(dāng)語句直到語句循環(huán)語句開域語句六、PASCAL語言的語句語句基本語句賦值語句過程語句讀語句891、賦值語句格式：<變量名>:=<變量名>注意：:=是賦值號，在書寫時中間不能加空格。賦值語句的執(zhí)行是：先計算（表達(dá)式的值），后賦值如：A：=（9*8）-（2-1）;

A:=A+1

1、賦值語句格式：注意：如：A：=（9*8）-（2-1）;90注意:

a，b:integer；——是一個說明語句。“：”是變量表和變量類型的分隔符

a=b——是一個表達(dá)式。它的值是一個布爾類型的量：TRUE或FALSE

a:=3；——是一個賦值語句。把整型常量值3賦給整型變量a

注意:91寫出下列程序運行后，變量a、b的值Programp2(input,output);Vara，b:integer;begina:=3;

b:=a;b:=a+1;