第3讲_顺序结构程序设计(pascal程序语言基础).ppt

2、随机产生一个三位自然数，分离出它的百位、十位与个位上的数字。 算法分析： s1：随机产生一个三位自然数； s2：分离出该自然数的百位、十位、个位上的数字； s3：输出百位、十位、个位上的数字。 课后作业： * * * * * * * * * * * * * * * * * * * * * * * * * 集里中学： 徐 晨 辉 第三讲 顺序结构程序 主要内容： 1、赋值语句 2、读语句 3、写语句 一、赋值语句 功能:对文件类型以外的任何类型的变量赋值 赋值语句的格式： 变量名 := 表达式； 其中“:=”称为赋值号。 执行过程： 计算机先计算赋值号右边表达式的值，然后将表达式的值赋给变量名代表的变量。 如：A :=（9*8）-（2-1）; A := A+1 赋值语句 例如： 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. 结论：变量的类型与 赋值符后面的表达式 的类型必须相同 下面哪些赋值语句是合法的哪些是不合法的 结论：可以将整型数据赋值 给实型变量，但是不能将实 型数据赋给整型变量 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.对于任何一个变量必须首先赋值,然后才能引用,否则,未赋初值的变量将以一个随机值参与运算. 6.赋值号两边的类型必须相同,但整数和实数遵守赋值相容性原理. 注意： 赋值语句 例题 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. 结论:变量的值是最近一次赋值语句执行后变量的值. 赋值语句 program text3; const a=‘*’; b=5; var x,y:integer; m,n:char; a1,a2:real; b1,b2:boolean; 课堂练习 下列语句哪些是正确的哪些是错误的 X:=y+b; y:=a1+3*b; a1:=x+y; a2:=3+b; b1:=(31)and (b1); m:=a; a2:=a; y:=9/3; a1:=a1+5 二、读语句 功能:通过输入设备(键盘)给变量提供数据 输入语句的格式： read(变量表名); readln(变量表名); 变量表名:用逗号隔开的变量标识符 一行输入多个变量值时，要求数据之间用空格分隔，readln语句要求输入数据后必须回车，使得后继操作从下一行的头上开始。 读语句——read语句 语法：read(a1,a2,……an); 等价于：read(a1);read(a2)…………read(an); 语句执行原理：当程序执行到read语句时，程序就会停下来 等待用户输入数据，然后存入相应的变量中。 program ex; var n,m:real; begin read(m,n); n:=m+n; writeln(‘n=‘,n); end. program ex; Var