1、信息学竞赛辅导班Pascal基础第三讲 顺序结构一、赋值语句格式: 变量 : 表达式; 作用: 把表达式的值赋给变量; 例如:Z:= a*2+b*2; 是计算a*2+b*2的值赋给变量Z注: 赋值符号是:和的组合,不能只有号 赋值符号两边的类型要相同,除了一种情况:右边是整数类型,左边是实数类型的变量 变量必须赋初值后才能引用。(系统默认数字为0,字符为空格,布尔值为FALSE)二、输入语句格式:read(V1,V2,);readln(V1,V2,);作用:程序执行到这个语句时,暂停运行,等待从键盘上输入数据,并把数据依次赋给相应的变量;例如: read(c,k); 是停止等待用户输入数据,如
2、果从键盘上输入5?6 则 c的值为5,k的值为6 注: 输入几个数据之间用空格键隔开。输入字符型数据时,不用空格隔开,连续输入 输入数据的类型要和变量的类型相同。变量是实数型的,可以输入整数 输入少于变量的数据时,键盘继续等待输入,直到输入足够的数据 read和readln的区别:readln可以不带参数; readln接收数据之后自动换行,下次读入从下行的数据开始;而使用read不换行,下次继续读入example: 分别有以下输入,说出各变量的值 Readln(a,b,c);Read(l,k,j);Readln(m,n);输入数据(1)1 3 5 7 9 2 4 6 8 10 20 30输入
3、数据(2)1 3 2 4 65 7 9 10 11三、输出语句 格式:write(V1,V2,);writeln(V1,V2,);作用:将括号中数据按格式输出;例如:write (a+b=,a+b); 是输出a+b的式子,显示的时候,加单引号的部分全部输出,不加单引号的部分表示输出ab的结果 注: 输出项可以是表达式,计算机会自动计算结果输出来 write和writeln的区别:writeln输出数据之后有换行 两种输出格式:write(X:n1);用于整数和字符的输出 write(X:n1:n2);用于实数的输出n1 表示输出的X占有n1 个位置,不足的在前面补空格n2 表示X输出保留n2
4、位小数,小数不足在末尾补0,超过的舍弃四舍五入如:writeln(a:8:2);当a3.537时,输出结果为_ _ _ _ 3 . 5 3四、example1、从键盘上读入长方形的边长a,b,计算它的面积和周长,输出Program B1;Var a,b,c,s:integer;s:real;Beginwrite(input a,b);Readln(a,b);c:=(a+b)*2;s:=a*b; writeln(c=,c, s=,s);End.2、交换两个变量a , b的值 方法:利用一个中间变量t,保存a的值于t,把b的值赋给a,再将t值赋给b。程序: Program JIAOH;Var a,
5、b,t:integer;Beginwrite(input a,b);Readln(a,b);t:=a;a:=b;b:=t;writeln(a=,a,b=,b);End.3、求一个四位整数的各位数字之和。程序: PROGRAM QIUH;VARNUM,A,B,C,D,SUM:INTEGER;BEGINWRITELN(请输入一个四位整数:);READ(NUM);A:=NUM MOD 10;B:=NUM DIV 10 MOD 10;C:=NUM DIV 100 MOD 10;D:=NUM DIV 1000;S:=A+B+C+D;WRITELN(SUM=,S:4)END.程序运行结果: 请输入一个四位整数: 9547 SUM=25五、练习1、已知某梯形的上底A,下底B,高H,求它的面积S。2、输入一个时、分、秒,把它转换为一个秒数。3、要求写一程序,计算和打印三个数的和及平均值。4、输入a,b两个数,输出ab的结果的横式与竖式。5、编一程序求半径为R的圆的周长与面积。第三讲2