培训体系 程序设计提高班培训讲义.pdf

培训体系 程序设计提高班培训讲 义 程序设计提高班培训讲义 胡苗坤 （2007 寒假） 第一讲 顺序结构程序设计 主要内容： 1 、熟练掌握赋值语句、输入输出语句的用法 2 、掌握顺序结构程序设计常用方法 3 、基本运算符的使用 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 的值