第3講順序結(jié)構(gòu)程序設(shè)計pascal程序語言基礎(chǔ)

1、第三講,順序結(jié)構(gòu)程序,主要內(nèi)容：,1,、賦值語句,2,、讀語句,3,、寫語句,一、賦值語句,功能,:,對文件類型以外的任何類型的,變量,賦值,賦值語句的格式：,變量標識符,：,= ,表達式,語句執(zhí)行過程：先計算,(,表達式的值,),，,后賦值（賦給變量標識符）,賦值語句,例如：,program ex;,const x=*;,var n,m:real;,k:boolean;,c:char;,e,f:integer;,begin,n:=1.0;e:=1;f:=1;,c:=x;,n:=n-1;,m:=3*n+n*n,k:=e=f,n:=e,end.,結(jié)論：變量的類型與,賦值符后面的表達式,的類型必須

2、相同,下面哪些賦值語句是合法的哪些是不合法的,結(jié)論：可以將整型數(shù)據(jù)賦值,給實型變量，但是不能將實,型數(shù)據(jù)賦給整型變量,program ex;,var n,:real;,k:boolean;,e,f:integer;,begin,n:=1.0;e:=1;f:=1;,n*n-6*e*f:=0;,k:=e;,n:=e;,f:=n;,end.,賦值語句,1.,賦值號（,:=,）左邊只能是變量，而不允許是表達式,2.,賦值號（：,=,“,賦值符號”）與等號（,=,“,比較操作,符”）是完全不同的。,3.,變量可以多次進行賦值,4.,被賦值的變量可以作為因子參與運算；,注意：,5.,對于任何一個變量必須首

3、先賦值,然后才能引用,否,則,未賦初值的變量將以一個隨機值參與運算,.,6.,賦值號兩邊的類型必須相同,但,整數(shù)和實數(shù),遵守賦值,相容性原理,.,賦值語句,例題,program text2;,var a,b:integer;,begin,a:=3,；,b:=2;,writeln(,a=,a,b=,b);,a:=a+b;,writeln(,a=,a);,b:=a-b;,a:=a-b;,writeln(,a=,a,b=,b);,end.,結(jié)論,:,變量的值是最近一次賦值語句執(zhí)行后變量的值,.,賦值語句,program text3;,const,a=*;,b=5;,var,x,y:integer;,

4、m,n:char;,a1,a2:real;,b1,b2:boolean;,課堂練習(xí),下列語句哪些是正確的哪些是錯誤的,X:=y+b; y:=a1+3*h;,a1:=x+y; a2:=3+b;,b1:=(31)and (b1);,m:=a; a2:=a; apred(n),y:=9/3; a1:=a1+5,二、讀語句,功能,:,通過輸入設(shè)備,(,鍵盤,),給變量提供數(shù)據(jù),輸入語句的格式：,read(,變量表名,);,readln(,變量表名,);,變量表名,:,用逗號隔開的變量標識符,讀語句,read,語句,語法,:read(a1,a2,an);,等價于：,read(a1);read(a2),r

5、ead(an);,語句執(zhí)行原理：當程序執(zhí)行到,read,語句時，程序就會停下來,等待用戶輸入數(shù)據(jù)，然后存入相應(yīng)的變量中。,program ex;,var n,m:real;,begin,read(m,n);,n:=m+n;,writeln(,n=,n);,end.,program ex;,var n:real,k:boolean;,e:integer;,f:char;,begin,read(n,e,k);,writeln(n,e);,read(n,e,f);,writeln(n,e,f);,read(k);,writeln(k);,end.,1.,整型和實型變量可以共用,一個讀語句。,2.,但

6、字符型變量不能與整型,實型變量共用一個讀語句。,3.,布爾型變量不能使用,read,語,句讀入。,讀語句,read,語句的執(zhí)行過程（對于語句,read(a);),1.,當,a,是字符型變量,read,（,a,）執(zhí)行時，從鍵盤讀入一,個字符（包括空格），存入變量,a,。,2.,當,a,是整型或?qū)嵭妥兞浚?read,（,a,）執(zhí)行時，系統(tǒng)讀,入一個形成數(shù)的序列，遇到不能形成數(shù)的字符,(,空,格符,),，停止讀入，將所讀取的數(shù)存入變量,a,。,3.,當,a,是整型變量時，讀入的數(shù)必須是整型；當,a,是實,型變量時，讀入的數(shù)可以是整型也可以是實型。,（數(shù)據(jù)相容性原理）,讀語句,例題,:,program

7、 text2;,var,a,c:integer;,b1,b2,b3:real;,ch1,ch2:char;,begin,read(ch1,ch2);,read(b1,b2,a,c,b3);,end.,結(jié)果,:ch1=x ch2=y,b1=3.0 b2=4.1,a=15 c=3,b3=-2.5,輸入：,xy 3 4.1 15 3 -2.5,讀語句,readln,語句,執(zhí)行原理：當程序執(zhí)行到,readln,時就自動跳到下一行,準備讀下一行的數(shù)據(jù)。不管當前行的數(shù)據(jù)是否讀完。,語法,:read(a1,a2,an);,等價于：,read(a1);read(a2),read(an);readln;,讀語句

8、,readln,語句,program text2;,var,a,c:integer;,b1,b2,b3:real;,ch1,ch2:char;,begin,read(ch1,ch2);,readln(b1,b2,a);,read(c,b3);,end.,輸入：,xy 3 4.1 15 3 -2.5,5 -5.5 8,結(jié)果,:ch1=x ch2=y,b1=3.0 b2=4.1,a=15 c=5,b3=-5.5,讀語句,讀語句,?,readln,語句可以不帶變量名,.read,語句必須跟變,量名,(read(,變量列表,).,?,語句,read,只管接收數(shù)據(jù)，語句,readln,接收完數(shù)據(jù),后，還

9、把同行的其它數(shù)據(jù)全部宣布作廢。,?,作用,:,單獨的,readln;,語句在程序中起著暫停作用,按,enter,鍵繼續(xù),通常起著調(diào)試程序的作用,.,read,語句與,readln,語句的語法特點,:,讀語句相關(guān)練習(xí),(,課堂作業(yè),),program ex;,var n,e,k,f:real;,begin read(n,e,f,k);,writeln(n);,readln;,writeln(e);,readln;,writeln(f);,readln;,writeln(k);,end.,1,、試一試下面程序,變量,說明,var,a,b,c,d:integer,；,執(zhí)行結(jié)果,a,b,c,d,程序,

10、段一,read(a);,readln(b,c);,read(d);,程序,段二,readln(a);,read(b,c);,read(d),輸入,數(shù)據(jù),1 2 3 4 5,6 7 8,2,、完成表格：,三、寫語句,將計算結(jié)果和其它數(shù)據(jù)傳送到顯示器的輸出操作,寫語句的兩種形式：,Write(,輸出項,),Writeln(,輸出項,),寫語句,輸出項的種類：,4,類,1.,表達式：,write(round(sqr(2.2)+1) div 2,）,write(10080);,特點：對表達式進行計算后再輸出。,2.,數(shù)值常量：,program text;,const pi=3.14;,begin,wr

11、ite(pi);,write(3.14);,end.,特點：直接輸出該常量的值。,寫語句,3.,字符常量,:write(,hello pascal,);,特點：用單引號括起來的字符序列,4.,變量：,program text1;,var a:real;,begin,a:=3.14;,writeln(,a=,a);,a:=58.5,writeln(,a=,a);,end.,特點：輸出變量中存儲的數(shù)據(jù),寫語句,Write,語句,格式：,write(a1,a2,a3,a4,a5,a6);,等價于：,begin write(a1); write(a2); write(a3);,end.,特點：,wri

12、te(a1),將,a1,的內(nèi)容輸出到顯示器上，不換行。在執(zhí),行,write(a2),時將,a2,的值原行直接輸出。,program text2;,var,n:integer; ch:char;,begin,n:=34,；,ch:=*;,write(n);,write(ch);,write(67);,end.,write(n,ch,67);,思考：三個寫為一,個可不可以,寫語句,試一試,program text2;,var n:integer;,ch:char;,begin,n:=34,；,ch:=*;,write(n);,write(ch);,writeln;,write(67);,end.,

13、注意：,write,語句至少要輸出一項內(nèi)容,writeln,語句,格式：,writeln(a1,a2,a3,a4,a5,a6);,等價于：,begin write(a1); write(a2); write(a3);,writeln;end.,特點：輸完最后一項后自動換行,寫語句,字符型變量的輸出,一,.,標準輸出格式：,write(ch),動作：,1.,字符變量,ch,的內(nèi)容輸出到顯示屏光標當前,的位置上,2.,光標下移一個位置，等待輸出下一個內(nèi)容,特點：輸出顯示寬度為一個字符寬。,二,.,場寬可控的輸出格式：,writeln(ch:n),表示所輸出字符變量,ch,，以右對齊的方式占,n,個

14、輸出,寬列數(shù),寫語句,標準輸出格式：,write(x),整型變量的輸出,特點：從光標當前位置開始輸出，輸出域?qū)捄蛿?shù)值位數(shù)相同,場寬可控的輸出格式：,write(x:n),特點：,1.,以右對齊的方式輸出整數(shù)變量,x,，占,n,個輸出寬列數(shù)。,2.,如果,x,的數(shù)值位數(shù)大于,n,，則輸出寬度和數(shù)值位數(shù)相同。,3.,數(shù)值的正負號占一列位置。,例如：,program text4;,var a,b,c:integer;,begin,a:=22;,b:=15;,c:=66;,write(a,b,c);,writeln;,writeln(a,b:8,c:8);,end.,寫語句,實型變量的輸出,1.,標準

15、輸出格式：,write(r),特點：在,17,個字符寬的輸出域上以科學(xué)計數(shù)法的形式,輸出實型變量,r,。,試一試：,program text4;,var a:real;,begin,a:=3.14159;,writeln(a);,end.,寫語句,特點：,r,為實型變量，,n,m,都為整型表達式。表示在,n,個字符寬的,輸出域上以小數(shù)的形式輸出實型變量,r,，其中小數(shù)點后面有,m,個,數(shù)字。,3.,場,寬可控的小數(shù)輸出格式：,write(r:n:m),program text4;,var a:real;,begin,a:=3.1416;,writeln(a:12);,writeln(a:10:2);,writeln(a:3:2);,writeln(a:1);,writeln(,*,a,*,);,end.,思考：,寫語句,program text3;,var ch1,ch2:char;