第二章 分支程序

 在程序设计中，许多问题是在一定条件下才选择某种处理方式的，这就需要用条件判断语句或情况选择语句进行处理。程序执行中将出现选择(分支)，根据条件只选择执行部分语句,不一定都是按原顺序从头到尾地执行所有语句，这样的程序称为分支程序。

第一节  条件语句与复合语句

[例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 语句常称为条件语句，它的一般格式为:

    (1) if 条件 then 语句；

    (2) if 条件 then 语句1  else  语句2；

IF 语句的功能是按条件在两种可能中选择其中一种。习惯上把if 后面的表达式称为条件，then 后面的语句称为真项，else 后面的语句称为假项。若条件成立(为真)就执行真项，然后执行if语句的后继语句；若条件不成立(为假)就跳过真项而执行假项，然后执行后继语句。而第一种格式只有真项，没有假项，当条件不成立(为假)就什么也不需做，直接往下去执行后继语句。

 

[例2.2] 读入三个不同的数，编程按由小到大的顺序排列打印出来。

解:设读入的三个数为a，b，c，为了把较小的数排在前面，可作如下处理:

   ① 如果a＞b就交换a、b的值，将较大的值换至后面；

   ② 如果a＞c就交换a、c的值，将较大的值换至后面；

   ③ 如果b＞c就交换b、c的值，将较大的值换至后面；

   ④ 输出处理后的a,b,c。

    Pascal程序:

    Progranm  Exam22；

    Var a，b，c，t: Real；

    Begin

        Write('Input a， b，c=')；

        Readln(a，b，c)；

        if a＞b then

begin                    ｛复合语句｝

             t:=a； a:=b； b:=t       {交换a，b}

           end；

        if a＞c then

begin                    ｛复合语句｝

             t:=a； a:=c； c:=t        {交换a，c}

           end；

        if b＞c then

begin                   ｛复合语句｝

              t:=b； b:=c； c:=t         {交换b，c}

            end；

        Writeln('a，b，c:'，a:6， b:6， c:6)；

        Readln

    End.

if 语句规定它的真项或假项位置上只能是一个基本语句，如果需要写一组语句，就应当使用复合语句。本程序中有三处用到复合语句。每个复合语句的范围是从Begin开始到与它相对应的End为止。复合语句的地位和一个基本语句相同；其一般格式为：

        Begin 

          语句系列 

        End；

 

习题2. 1

1.假设邮局规定寄邮件时若每件重量在1公斤以内(含1公斤)，按每公斤1.5元计算邮费，如果超过1公斤时，其超出部分每公斤加收0.8元。请编程序计算邮件收费。

2.输入三个正整数，若能用这三个数作为边长组成三角形，就计算并输出该三角形的面积，否则输出Can't。(组成三角形的条件为：任意两边之和大于第三边)

3.输入一个三位数的整数，将数字位置重新排列，组成一个尽可大的三位数。例如：输入213，重新排列可得到尽可能大的三位数是321。

转载于:https://www.cnblogs.com/qilinart/articles/3331359.html