pascal IF嵌套和Case语句.doc_第1页
pascal IF嵌套和Case语句.doc_第2页
pascal IF嵌套和Case语句.doc_第3页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

第六讲 IF嵌套和Case语句一、IF语句的嵌套在if语句中,如果then子句或else子句仍是一个if语句, 则称为if语句的嵌套。例1计算下列函数 分析:根据输入的x值,先分成x=100两种情况,然后对于情况x=100,再区分x是否小于200。解法一:使用if嵌套语句program ex;varx:real;自变量y:real;因变量beginwrtie(Input x:);readln(x);if (x100)then y:=x+1else if x200then y:=x-1else y:=-1;writeln(x=,x,y=,y);end.显然,以上的程序中,在else子句中嵌套了一个型if语句。当然程序也可以写成如下形式:解法二:CASE语句program ex;var x,y:real; s:integer;信号灯begin write(input x:);Trunc()是取整函数比如说trunc(2.5)=2trunc(3.9)=3trunc(9)=9而实型就是所有实数,包括无理数(如根号2)、整数、小数等等整型是只有整数的所以trunc函数对实型有用readln(x)s:=trunc(x/100); case s of 0:y:=x+1;1:y:=x-1;Else y:=0;End;/case endWriteln(x=,x);Writeln(y=,y);End.二、case语句上面我们知道可以用嵌套的if语句实现多分支的选择结构。但是如果分支越来越多时,用嵌套的if语句实现多分支就显得繁杂。当多分支选择的各个条件由同一个表达式的不同结果值决定时,可以用case语句实现。它的选择过程,很象一个多路开关,即由case语句的选择表达式的值,决定切换至哪一语句去工作。因此在分支结构程序设计中,它是一种强有力的手段。在实现多路径分支控制时,用case对某些问题的处理和设计,比用if语句写程序具有更简洁、清晰之感。(一)、情况语句的一般形式:case of:语句1 ;:语句2 ;::语句n ;end;其中case、of、end是Pascal的保留字, 表达式的值必须是顺序类型,它可以是整型、布尔型及以后学习的字符型、枚举型和子界型。情况标号表是一串用逗号隔开的与表达式类型一致的常量序列。语句可以是任何语句,包括复合语句和空语句。(二)、case语句的执行过程先计算表达式(称为情况表达式)的值,如果它的值等于某一个常量(称为情况常量,也称情况标号),则执行该情况常量后面的语句,在执行完语句后,跳到case语句的末尾end处。练习题:输入两个正整数a,b。b最大不超过三位数,a不大于31。使a在左,b在右,拼接成一个新的数c。例如:a2,b16,则c216;

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论