PASCAL程序课件.ppt

* * Pascal系列教程 第一节 Pascal 程序结构和基本语句 [例1.1]已知一辆自行车的售价是300元，请编程计算a辆自行车的总价是多少？ 解：若总售价用m来表示，则这个问题可分为以下几步处理： ①从键盘输入自行车的数目a； ②用公式 m=300*a 计算总售价； ③输出计算结果。 下面给出解决这一问题的PASCAL程序 Pascal程序： Program Ex12; {程序首部} Var a,m : integer; {说明部分} Begin {语句部分} Write(‘a=’); ReadLn(a); {输入自行车数目} M := 300*a; {计算总售价} Writeln(‘M=’,m); {输出总售价} ReadLn; {等待输入回车键} End. 从以上程序可看出一个Pascal 程序由三部分组成: (1)程序首部：由保留字Program开头，后面跟一个程序名(如:Exl1)； 其格式为: Program 程序名； (2)说明部分 程序中所用的常量、变量，或类型、及过程与自定义函数，需在使用之前预先 说明，定义数据的属性（类型）。 (3)语句部分 指由保留字 Begin (开始)至 End. (结尾)之间的语句系列，是解决问题的具体 处理步骤，也是程序的执行部分。 Pascal程序不管是哪部分，一般来说每句末尾都必须有 分号(；)，但允许最接近 End 的那个语句末尾的分号省略； 还有就是象IF语句不用分号；程序结束的End末尾必须有圆 点(. )，是整个程序的结束标志。程序中花括号“{ }”之间的 部分为注释部分。 总结上面所说，可以把Pascal程序结构归纳为如下的示意图： Program 程序名； 程序首部 标号说明； (Label) 常量说明； (Const) 说明部分 类型说明； (Type) 变量说明； (Var) 过程或函数说明； Begin 程序体 (主程序) 语句系列； 语句部分 End. 第二节 顺序结构程序与基本数据类型 PASCAL程序中为我们提供了三种程序结构，分别是： 1、顺序结构 2、分支结构 3、循环结构 1、顺序结构 例1.2：交换两个变量的值：由键盘输入两个正整数A和B，编程交换这两个变量的值。解：交换两个变量的值。 可以想象成交换两盒录音带（称为A和B）的内容，可以按以下步骤处理： 步骤①：拿一盒空白录音带C为过渡，先将A翻录至C； 步骤②：再将B翻录至A； 步骤③：最后将C翻录至B。 按照以上的想法，可以把程序写成如下所示： Program Exam17; Var a,b,c : integer; Begin Write(‘A,B=’); Readln(a,b); C:= A; ｛等价于步骤1｝ A := B; ｛等价于步骤2｝ B := C; ｛等价于步骤3｝ Writeln(A,B); End. 观察以上程序，我们会发现本程序语句的顺序很关键。程序中所用的语句如果顺序不同，得到的结果便会不同，我们把这类程序称为顺序程序。 2、分支结构 一、条件语句与复合语句 例2.1：某服装公司为了推销产品，采取这样的批发销售方案:凡订购超过100 套的，每套定价为50元，否则每套价格为80元。编程由键盘输入订购套数，输出应付款的金额数。 解:设X为订购套数，Y为付款金额，则: 由此可得出解决步骤： ① 输入X; ② 判断 X 值； ③ 根据判断结果选择符合条件的那种方法计算Y值； ④ 输出计算结果。 写成程序为： Pascal程序: Program Exam21； Var x，y: integer； Begin Write(X=) ；Readln(x) ； { 输入X} if x 100 then y:=50*X else y:＝80*X； {条件判断与选择 } Writeln(y=，y) ； Readln End. IF 语句的功能是按条件在两种可能中选择其中一种。习惯上把if 后面的表达式称为条件，then 后面的语句称为真项，else 后面的语句称为假项。若条件成立(为真)就执行真项，然后执行if语句的后继语句；若条件不成立(为假)就跳过真项而执行假项，然后执行后继语句。而第一种