Pascal語言是由瑞士的沃斯教授于1971年提出來的.ppt

第一節(jié) Turbo Pascal 簡介 Pascal語言是由瑞士的沃斯教授于1971年提出來的，它的命名是為了紀念法國數(shù)學家Pascal。 Pascal是一種結(jié)構(gòu)程序設計語言，它注重于語言的可靠性、易于驗證性、概念的清晰性和實現(xiàn)的簡化性。充分考慮了算法設計中的自頂而下、由粗到精的模塊化思想，以及總可將算法步驟剖解為順序、分支、重復三種基本結(jié)構(gòu)流程的結(jié)構(gòu)化原則，提供了豐富的數(shù)據(jù)類型和清晰的描述模塊化的語句。 Pascal特別適用于教學，因為它使程序設計的基本概念和結(jié)構(gòu)可以用Pascal所提供的一種系統(tǒng)的、精確的、而且合理的方法來描述。用它寫的程序結(jié)構(gòu)化好，語法要求嚴謹。,(一）Free Pascal 環(huán)境介紹 (1)進入與退出(注意:退出時必須使用文件菜單中的退出命令或Alt+X) (2)編輯程序 光標移動鍵的使用 Backspace鍵:刪除光標前一個字符 Ctrl+N:在光標前插入一行 Ctrl+Y:刪除光標所在行 Home:光標移到行首 End:光標移到行尾 PageUp/PageDown:上下翻頁 Insert:插入與改寫狀態(tài)切換 (3)編譯程序(Compile):Alt+F9 (4)運行程序(Run):Ctrl+F9 (5)保存程序(Save):F2 (6)打開原有的程序:F3 (7)查看程序運行結(jié)果:Alt+F5 (8)調(diào)試時增加觀察項:Ctrl+F7,（二）一個簡單的Pascal程序 例：已知長方形的長和寬，求長方形的面積。 程序代碼如下： Program changfangxing(input,output); Var a ,b ,s :real ; Begin readln(a,b); s:=a*b ; write(s= , s ) ; readln; End.,程序首部是程序的開頭部分,由保留字program后接程序名及程序參數(shù)表組成.,程序的主體部分由說明部分和執(zhí)行部分組成 Pascal規(guī)定凡在程序中所使用的常量,變量,文件及過程和函數(shù)(除標準外),都必須在說明部分說明后才能在程序執(zhí)行部分使用.,程序的執(zhí)行部分,由begin 開始,end結(jié)束,每條語句以分號隔離,一行寫一條語句或多條語句,最后一行end加 . 表示程序結(jié)束. Pascal在程序書寫時不區(qū)分大小寫,完全的pascal程序框架: Program 程序名(程序參數(shù)表); Label 標號說明; Const 常量說明; Type 類型說明; Var 變量說明； Function 函數(shù)說明; Procedure 過程說明; Begin 程序語句 End.,第二節(jié) 數(shù)據(jù)類型、常量、變量及說明方法 一、標準數(shù)據(jù)類型 1、整型：包括正整數(shù)、負整數(shù)和零。 例：說出哪些是合法的整數(shù)哪些是非法的？ 123 0 -247 12.24 14A -0.1 分類：integer -32768(minint) 32767(maxint) shortint -128 127 longint -2147483648 2147483647 byte 0 255 word 0 65536,整數(shù)的運算符：+ - div mod 例： 18 div 5 = 18 div 10 = 18 mod 5 = 18 mod 10 = (1)判斷下列式子對還是錯？ A mod B= A - （ A div B ） * B (2)一個三位自然數(shù)X，其百位數(shù)a:=?,十位數(shù)b:=?; 個位數(shù)c:=? (3)整型的運算中不能出現(xiàn)“/”,如:4 / 2的結(jié)果只能賦給實型變量。,2、實數(shù)類型(real)：包括正實數(shù)、負實數(shù)和實數(shù)零 例：var x : Real ; 字長為16位的計算機，其實數(shù)的的絕對值范圍在1E-38 到1E+38之間。 （1、 十進制表示法：如0.0 2.1 -20.12 科學表示法：采用指數(shù)形式。如3.6E2 -2.1E5 -3.4E-3是合法的；而E+12 3.4E1.2是非法的。 （2、實數(shù)的運算符有+ - * / 如：1.2+5= 8.4/2.1=,3、字符類型： char 用兩個單引號引起來一個字符。（AscII碼字符集） 如 a 、 1 、 x 例 var x : char ; 說明：string 表示字符串 4、布爾類型：boolean 例：var x : boolean ; 布爾類型的數(shù)據(jù)只有兩個：false 和 true 布爾類型的邏輯運算符有 and or not 例；(x=3) and (y5) 練習：寫出變量X在10到100之間的邏輯表達式。 寫出既能被3整除，又能被5整除的表達式。,常量：指在程序執(zhí)行過程中其值不能改變的量。 Pascal有三個標準常量是maxint true false . 例：鍵入圓半徑求圓周長。 哪個是常量？ 如何定義：const pi=3.14159; 例：const t=false; 注意下面是錯的： Const x=3.12; Var x:real；,變量： 變量是指在程序執(zhí)行過程中可以改變值的數(shù)據(jù). （1)、變量如何定義？ var m :real; x,y :integer; a1,a2:char; 其中x ,m,y, a1,a2稱作變量名；變量名的命名規(guī)則 1、首字符必須是英文2、只能由英文、數(shù)字和下劃線組成。 （2)、變量性質(zhì) （新來舊去，用之不盡） 例： x: = 1; x:= 2 ; x:= x+1 ; y:= 100 ; y:=x;,Pascal標準函數(shù)： Abs(-2)= Sqr(3)= Sqrt(100)= Chr(48)= Ord(A)= Trunc(12.23)= Pred(B)= succ(B)= Exp(2) ln(2) ASCII 表：048 ; A-65；B-66； a-97; b-98 判斷奇偶數(shù)的函數(shù)： 奇數(shù)為true 偶數(shù)為false Odd(2)= Sin(x) cos(x) 要求x為弧度。 練習：將任一大寫字母X轉(zhuǎn)換成小寫字母,Pascal表達式： 1、由常量、變量、函數(shù)、括號及運算符聯(lián)結(jié)起來的式子。例：1、 2+3*4 x 2、表達式的優(yōu)先級別： 同級運算從左到右，不同級別從高到低 括號 not * / div mod and + - or關(guān)系運算符 3、書寫表達式規(guī)則： 只能用圓括號，可成對可嵌套； 乘號以*表示，不能省略 如（1+2）mod 2*3,練習： 一、判斷以下標識符的合法性： a3 3a a17 a_4 abcd ex9.5 二、將下列的數(shù)學表達式改寫成PASCAL表達式： 一元二次方程根的表達式；ax2+bx+c 三、求下列表達式的值： 20 mod 19 15 mod 9 7 div 8 19 div 3 (45) and (79) or ( 91 and (3=3) or (37),四、I 是j 的整數(shù)倍的布爾表達式： M 是偶數(shù)的布爾表達是： Y在-2到-1之間的布爾表達式是： 五、有一編碼規(guī)則如下： 原碼：A B C.X Y Z 密碼：Z Y X C B A 已知原碼變量為X，則密碼的表達式是：,I mod j=0 M mod 2=0 或not(odd(m) (y-2)and (y-1) Chr(ord(A)+ord(Z)-ord(x),第二章 順序結(jié)構(gòu) 一、賦值語句 格式： 變量標識符：=表達式； 功能：先計算表達式的值，再將值賦給變量標識符。 例： program exp_1; const a=256; var b , d :integer; c:real; begin b:=a div 16; c:=a / b ; d:=a; end.,說明： 1、“：= ” 為賦值號。不同于數(shù)學中的等于號。（pascal中的“=”存在于關(guān)系表達式，判斷=左右是否相等，若等，其值為true ，否則為false. 例 if x=3 then else . 2、變量要先說明 在賦值號左邊出現(xiàn)的變量，要在程序頭的說明部先加以說明，否則編譯時出錯。 3、賦值號兩邊類型應匹配（相同或相容） var s1,s2 :real; x1,x2 : integer; qq:char; begin s1:=s2; x1:=s1; end.,讀程序，寫出各變量的值 Var x ,y :integer; begin x:=12 y:=x x:=x+1 y:=x+1 End.,Var x,y,tmp:integer; Begin x:=1; y:=5 tmp:=x; x:=y ; y:=tmp; End.,二、輸入語句 格式： read(變量名表)； readln(變量名表)； readln； 說明: 1、變量名表。寫在括號中的變量，都要在變量說明中先預以說明；變量與變量之間，以“,”分隔； 例：var a,b:integer; begin read(a,b); end. Read(a);read(b) ; readln(a);readln(b);,2、從鍵盤接收數(shù)據(jù)時，要注意各種不同數(shù)據(jù)類型數(shù)據(jù)的分隔符不同。所謂分隔符就是兩個完整的數(shù)值之間的標記，也可以這樣理解，當計算機從鍵盤讀入數(shù)據(jù)時，一旦碰到分隔符，就認為當前的數(shù)據(jù)讀入已完成，可以把它賦給相應的變量了。各種數(shù)據(jù)類型的分隔符如下： 數(shù)值型（包括整型、實型以及它們的子界類型）以空格或回車符作為分隔符； 字符型不需分隔符（因為字符型數(shù)據(jù)的長度固定，只有一個）； 字符串以回車符作為分隔符。,read與readln的區(qū)別,4、“readln;”語句從鍵盤接收一個回車符。 這個語句通常用在需要暫停的地方。如輸出時用來等待程序員看清結(jié)果。 readln(a,b)相當于read(a,b);readln;相當于read(a);read(b);readln;,三、輸出語句 格式：write(輸出量表)； 輸出后不換行 writeln(輸出量表)； 輸出后換行 writeln； 輸出一個回車符 說明： 1、輸出量可以是： 變量: 輸出變量的值。輸出多個變量時，變量間用“,”分隔. 如：write(x,y,a); 表達式: 輸出的是表達式的值.如write(3*2); 常量: 直接輸出常量值.如write(x+y= ,x+y ); Write(x);write(y); Writeln(x);writeln(y);,2、標準場寬,3、自定義場寬： (1)單場寬：形式：write(x:n) 例 write(OK:8); 表示輸出字符串“ OK”，場寬是8 如：輸出7個空格如何表示？ write( ：7); 如：write(abcdefg:3); 則輸出什么結(jié)果？ 注意：以n個字符寬度輸出冒號前數(shù)據(jù)項，如果數(shù)據(jù)項長度不足n，則前面以空格補齊；如果數(shù)據(jù)項長度大于n，則以實際長度輸出。,（2）雙場寬 雙場寬是用來控制實型數(shù)據(jù)的輸出格式的，其形式：x:n1,n2 例：write(123.4525:8:2); 輸出結(jié)果 123.45 實型數(shù)據(jù)不帶格式限制時，以科學計數(shù)法的形式輸出。如果加上場寬的限制，按十進制形式輸出。 var a:real; begin a:=15/8; writeln(a); 輸出 1.8750000000E+00 writeln(a:8:2);輸出 1.88，但內(nèi)存中仍是原來的值。 writeln(a:0:0):輸出 2 ， end.,3、“writeln;”語句通常用于輸出多組數(shù)據(jù)時在屏幕上輸出空行來分隔數(shù)據(jù)組 例：write(x,y);writeln;write(a,b); 例：writeln(x,y);writeln(a,b);,課堂練習：讀程序?qū)懡Y(jié)果： Program ex1(input,output); Var a ,b ,s ,d:integer; l,e,g:boolean; Begin a:=3; b:=7; s:=a+b;d:=a div b; l:=ab; write(s=,s:5); writeln(d=,d:5); writeln(l=,l); writeln(e=,e,g=,g); writeln(b/a:5:5) End.,1、鍵入三角形三邊長a ,b， c ,求