pascal-if嵌套与case语句.doc

pascal-if嵌套与case语句第五课if嵌套与case语句一、IF语句的嵌套在if语句中,如果then子句或else子句仍是一个if语句,则称为if语句的嵌套。例1计算下列函数分析:根据输入的x值,先分成x>0与x?0两种情况,然后对于情况x?0,再区分x是小于0,还是等于0。源程序如下:programex;varx:real;y:integer;beginwrtie('Inputx:');readln(x);ifx>0theny:=1,x>0时,y的值为1,else,x?0时,ifx=0theny:=0elsey:=-1;writeln('x=',x:6:2,'y=',y);,以上的程序中,在then子句中嵌套了一个?型if语句。当然程序也可以写成如下形式:programex;varx:real;y:integer;beginwrtie('Inputx:');readln(x);ifx>=0thenifx>0theny:=1elsey:=0elsey=-1;writeln('x=',x:6:2,'y=',y);,下面的程序是不对的。y:=0;ifx>=0thenifx>0theny:=1elsey:=-1;明显,从此人的程序书写格式可以看出,他想让else与第一个if配对,而事实上,这是错的。因为pascal规定:else与它上面的距它最近的then配对,因此以上程序段的逻辑意义就与题义不符。要使上程序段中esle与第一个then配对,应将程序段修改为:y:=0;或者y:=0;ifx>=0ifx>=0thenifx>0thentheny:=1beginelseifx>0thenY:=1;elsey:=-1;endelseY:=-1;二、case语句上面我们知道可以用嵌套的if语句实现多分支的选择结构。但是如果分支越来越多时,用嵌套的if语句实现多分支就显得繁杂。当多分支选择的各个条件由同一个表达式的不同结果值决定时,可以用case语句实现。它的选择过程,很象一个多路开关,即由case语句的选择表达式的值,决定切换至哪一语句去工作。因此在分支结构程序设计中,它是一种强有力的手段。在实现多路径分支控制时,用case对某些问题的处理和设计,比用if语句写程序具有更简洁、清晰之感。(一)、情况语句的一般形式:case<表达式>of<情况标号表1>:语句1;<情况标号表2>:语句2;<情况标号表n>:语句n;end;其中case、of、end是Pascal的保留字,表达式的值必须是顺序类型,它可以是整型、布尔型及以后学****的字符型、枚举型和子界型。情况标号表是一串用逗号隔开的与表达式类型一致的常量序列。语句可以是任何语句,包括复合语句和空语句。(二)、case语句的执行过程先计算表达式(称为情况表达式)的值,如果它的值等于某一个常量(称为情况常量,也称情况标号),则执行该情况常量后面的语句,在执行完语句后,跳到case语句的末尾end处。(三)、说明?情况表达式必须是顺序类型的;所谓顺序类型的变量,就是指整型,字符型,枚举型,子界型,不允许是实型。?情况常量是情况表达式可能具有的值,因而应与情况表达式具有相同的类型;?情况常量出现的次序可以是任意的;?同一情况常量不能在同一个case语句中出现两次或两次以上;?每个分语句前