第四章 程序的顺序结构.ppt

第四章　Pascal程序的顺序结构 4.1赋值语句 赋值语句的格式： 变量:=数值或表达式 作用：将“数值”或表达式的计算值存入“变量”中。 如：若r为实型变量 r:=2.0*2.0 r:=2*2 r:=r+1 4.1赋值语句 例1：执行以下程序后a,b,c的值各为多少？ program Ex3; var a,b,c:integer; begin a:=3;b:=5; c:=a; a:=b; b:=c; end. 例2：执行以下程序后a,b的值各为多少？ program Ex3; var a,b:integer; begin a:=3;b:=5; a:=a+b; b:= a-b; a:=a-b; end. 4.2输入语句 4.2.1 read语句 格式：read(变量1，变量2，…，变量n) 功能：从键盘读入n个整型或实型数据，依次存入变量1，变量2，…，变量n中。 注：1.输入n个数据之间用空格作分隔符。 例：设a，b，c都是整形变量，当执行到语句read(a,b,c)时，程序会等待你从 键盘输入数据。 如果输入15 21 35 则a,b,c三个变量分别获得15,21,32 如果执行read(a);read(b,c)效果一样。 如果输入四个或以上数据时，也只接受前三个数据。 如果输入两个或以下数据时，则程序会继续等待，直到输入三个数据为止。 2.若输入字符型数据时，字符数据之间不能用分隔符，而且字符数据不可以带 引号。 例：设a,b为字符型。如果执行read(a,b)把’A’、’B’分别存入a,b中，则应输入 AB; 如果输入A B，则结果为a=‘A’，b=‘’； 作业：如果输入’A’’B’，结果？ 4.2输入语句 4.2.2 readln语句 格式1：readln; 功能：执行一次换操作，使下一个输入语句read或readln从 下一输入行读入数据。 格式2：readln(变量1，变量2，…，变量n) 功能：相当于执行下面两个语句： read(变量1，变量2，…，变量n)； readln; 例：执行read(a,b);readln;read(c),输入数据 15 21 32 27 结果：a=15,b=21,c=27 作业：a,b,c,d,e为整形,从键盘输入 顺序执行read(a,b,c,d,e);readln(a,b,c,d,e)，结果？ 顺序执行read(a,b);read(c,d)，结果? 顺序执行readln(a,b);read(c,d),结果？ 4.3输出语句 4.3.1 write语句 格式：write(值1，值2，…，值n) 功能：将各值依次显示在屏幕上，一行显示不下，自动换行。 注意：在执行完一个write语句后，输出还会自动换行，下一个write 继续接着输出在同一行上。 如：执行write(‘计算结果:’,25*37)和顺序执行 write(‘计算结果:’)； write(25*37)结果相同。屏幕显示 计算结果： 925 4.3输出语句 4.3.2 writeln语句 格式1：writeln; 功能：在屏幕上执行一次换行操作。 格式2：writeln(值1，值2，…，值n) 功能：相当于顺序执行以下两个语句 write(值1，值2，…，值n); writeln 例：顺序执行witte(‘计算结果:’);writeln;write(25*37),则屏幕显示 计算结果： 925 4.4输出格式 4.4.1 标准格式数据的输出长度: integer:实际位数输出 real:一律按指数形式输出,占17位,不含符号位及指数表示符 char:1位 boolean:四位或五位(true false) 4.4.2自定义格式 1.write(x:n)