(程序设计提高班培训讲义.docVIP

程序设计提高班培训讲义 胡苗坤 （2007寒假） 第一讲 顺序结构程序设计 主要内容： 熟练掌握赋值语句、输入输出语句的用法 掌握顺序结构程序设计常用方法 基本运算符的使用 4、常用函数和过程 一、赋值语句（：=） 格式：变量名：=表达式 功能：将表达式的值计算出来赋给相应的变量。 不管什么计算机语言，赋值语句都是最基本最常用的语句，通过它给变量赋值来进行各种运算、处理。 如 a:=10*5; {a的值为50} a:=a+1；{将a的值增加1，常用此语句来进行计数} s:=s+a; {将s的值增加a，常用类似的累加语句来进行求和} t:=t*a; {将t的值变为原来的a后倍，常用类似的语句来进行累乘} 例题1：交换两个数值型变量a和b的值 [分析与算法选择]： 要交换两个变量的值，可以联想起现实世界中交换两个容器A和B中所装的东西，一般要先引进一个空的容器C，先将一个容器（如A）里的倒入C，再将另一个容器B的倒入A，最后将C的倒入B，从而实现A、B容器内容的互换。 [方法1]：引进第三个变量 c:=a; a:=b; b:=c; [方法2]：先合并后分开 a:=a+b; {如原来a=3,b=5，执行此语句后a=8,b=5} b:=a-b; {执行此语句后a=8,b=3} a:=a-b; {执行此语句后a=5,b=3} 还有其它一些办法，但都没有上面的两种方法通用。如可先乘再除，这种方法对于有一个变量为0的情况就不正确了。也可能会出现除数为0的情况。 例题2：计算四个变量的乘积 [分析与算法选择]： 一般的计算，可以直接用一个表达式将运算结果给一个变量就行了。如果变量的个数不确定，或者说变量的个数很多，此时用一个表达式就不方便了，可行的方法是来一个就算一个，直到全部的都算好结束。在后面的循环中常用这种方法。 [参考程序]： program example5_2; var t:longint; a,b,c,d:integer; begin write(‘Enter integer a,b,c,d:’); readln(a,b,c,d); t:=1; t:=t*a; t:=t*b; t:=t*c; t:=t*d; writeln(‘a*b*c*c=’,t); end. [补充说明]： 累加时，存放累加值的变量初值一般为0；而累乘时必须将相应变量的初值赋为1。如上述程序中t的初值为1，如果没有这句，系统默认的初值为0，那么乘下来结果也是0。 二、read/readln 读取数据 格式：read(变量) 或 read(变量1，变量2，……) readln(变量) 或 readln(变量1，变量2，……) 功能：在运行程序时读入相应数据给指定变量，直到读入的数据满足为止，这里所说的满足有两个方面的含义，一是类型的一致，二是数据的满足。 Readln跟read不同的地方就是它执行完后将到下一行。 例：read(a,b,c) ; 根据事先定义的类型由用户在运行程序时输入相应的数据给a,b,c,也可分开写成三个read语句：read(a);read(b);read(c)。 readln(a,b,c); 与read(a,b,c)不同是读完数据后另起一行，如果将它分为三个语句readln(a); readln(b); readln(c)执行时可能读入的数据跟原来不一样，自己上机去试试吧！ readln; 空读语句，一般起到让程序运行时停止由用户回车后继续或跨过一行中其余的数据，保证下一个读语句从下一行头一个数据开始读取。 三、write/writeln 输出语句 语句功能：输出指定表达式的值。 如wirte(a),write(‘Jiangshu’); 分别输出a的值和Jiangshu （1）场宽 在输出项后用“：数字”指明输出的宽度。 如write(5:6)，则输出： 5 {5的前面有5个空格，整个输出项占6个字符的位置} 对于实数类型的还可以通过“：数字1：数字2”指明输出数字的宽度和小数点后的位数。 如：write(1.2:10:5) 将输出： 1.50000 {整个输出项占10个字符位置，整数部分占4位，小数点1位，小数部分5位，其中整数部分不足的在高位补空，小数部分不足在后面补0} 如果指定的宽度比原输出项应有的宽度小呢？ 对于整数或字符等类型的，将自动调整到最小所要的宽度，如write(‘ABCD’:2)仍将输出ABCD。 对于实数，小数部分会取自定的位数，将尾部去除（四舍五入），并自动适应到最少的宽度。 [思考]： 如何对小数点后指定位进行四舍五入？ [解答]： 一种方法是直接指定输出小数点后指定的位数，如对于变量a