pascal if嵌套和case语句

《pascal if嵌套和case语句》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、第六讲IF嵌套和Case语句一、IF语句的嵌套　　在if语句中，如果then子句或else子句仍是一个if语句，则称为if语句的嵌套。　　例1　计算下列函数　　　　　分析：根据输入的x值，先分成x<100与x>=100两种情况，然后对于情况x>=100，再区分x是否小于200。解法一：使用if嵌套语句programex;　　var　　　　x:real;自变量　　　　y:real;因变量　　begin　　　　wrtie('Inputx:');readln(x);　　　　if（x<100）　theny:=x+1　　　　　else　　　　　　ifx<200　theny:=x-1　　　　　

2、　elsey:=-1;　　　　writeln('x=',x,'y=',y);　　end.　　显然，以上的程序中，在else子句中嵌套了一个Ⅱ型if语句。当然程序也可以写成如下形式：　　解法二：CASE语句programex;varx,y:real;s:integer;信号灯beginwrite(‘inputx:’);Trunc（）是取整函数比如说trunc(2.5)=2trunc(3.9)=3trunc(9)=9而实型就是所有实数，包括无理数（如根号2）、整数、小数等等整型是只有整数的所以trunc函数对实型有用readln(x)s:=trunc(x/100);casesof0:y

3、:=x+1;1:y:=x-1;Elsey:=0;End;//caseendWriteln(‘x=’,x);Writeln(‘y=’,y);End.二、case语句　　上面我们知道可以用嵌套的if语句实现多分支的选择结构。但是如果分支越来越多时，用嵌套的if语句实现多分支就显得繁杂。当多分支选择的各个条件由同一个表达式的不同结果值决定时，可以用case语句实现。它的选择过程，很象一个多路开关，即由case语句的选择表达式的值，决定切换至哪一语句去工作。因此在分支结构程序设计中，它是一种强有力的手段。在实现多路径分支控制时，用case对某些问题的处理和设计，比用if语句写程序具有更简洁

4、、清晰之感。　　(一)、情况语句的一般形式：　　case<表达式>of　　　<情况标号表1>：语句1;　　　<情况标号表2>：语句2;　　　:　　　<情况标号表n>：语句n;　　end;　　其中case、of、end是Pascal的保留字，表达式的值必须是顺序类型，它可以是整型、布尔型及以后学习的字符型、枚举型和子界型。情况标号表是一串用逗号隔开的与表达式类型一致的常量序列。语句可以是任何语句，包括复合语句和空语句。　　(二)、case语句的执行过程　　先计算表达式（称为情况表达式）的值，如果它的值等于某一个常量（称为情况常量，也称情况标号），则执行该情况常量后面的语句，在执行完语

5、句后，跳到case语句的末尾end处。练习题：．输入两个正整数a，b。b最大不超过三位数，a不大于31。使a在左，b在右，拼接成一个新的数c。例如：a＝2，b＝16，则c＝216；若a＝18，b＝476，则c＝18476。　　提示：求c的公式为：　　　　　　　c＝a×K＋b　　其中：　　　　S:Casesof;0:k=101:k=100