资源描述:
《《选择结构》ppt课件》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第四讲选择结构主讲人:张志刚IF语句的一般格式是:IF条件THEN语句1{条件为真时的响应、处理}ELSE语句2;{条件为假时的响应、处理}担待4.1IF语句使用条件语句时要注意:1、条件语句是一个语句。IF、THEN、ELSE都是语句的一个部分。所以它只能有一个“;”作为分隔符,放在句子的结束,特别要注意不能放在ELSE之前。2、如果我们的程序只需对条件为真的情况作出处理,不需要处理条件为假的情况,则IF语句省略ELSE分句,格式变成:IF条件THEN语句1;{条件为真时的响应、处理}如:如果数a大于等于0则输出它的平方根。ifa>=0thenwriteln(sqrt(a));对
2、以上的例子,条件为假时不需处理,于是我们干脆省去ELSE分句。3、if语句可以多层嵌套。嵌套时为了避免误解,可以用begin,end括起嵌套部分;else分句一般和最近的if分句配套:IF条件0THENBEGIN if条件1then……else……;END ELSEBEGIN if条件2then……else……;end;例1、输入两个数a,b,输出较大的数。programtt;vara,b:integer;beginwrite('pleaseinputa,b:');readln(a,b); ifa>bthenwriteln(a)
3、 elsewriteln(b);end.4.2CASE语句分情况语句适用于对一个条件的多种情况的响应。 格式:case表达式of标号1:语句1; 标号2:语句2;……标号n:语句n;else语句n+1end;case语句在使用时有几点要注意:1.end与case对应;标号与语句之间用“:”分隔;else与语句之间不用分隔符。2.标号必须是一常量,其类型与表达式的类型一致例题:某全自动加油站a,b,c三种汽油的单价(元/kg)分别是1.50、1.35和1.18,也提供了“自己加”或“协助加”两个服务等级,这样用户可以得到5%或10%的优惠。编一个程序,用户输
4、入加油量、汽油品种和服务类型(f-自动,m-自己,e-协助),然后计算应付款。programpcase1;varoil,help:char;kg,total:real;beginwrite('Entertheamountinkilograms(kg):');readln(kg);write('Whichtypeofthegasoline(a,b,c):');readln(oil);wirte('Whichtypeforservice(f,m,e):');readln(help); caseoilof 'a':total:=1.50*kg;
5、'b':total:=1.35*kg; 'c':total:=1.18*kg; elsewriteln('InputError!') end;{——————处理汽油的类型}casehelpof 'f':; 'm':total:=total*(1-0.05); 'e':total:=total*(1-0.10); elsewriteln('InputError!') end;{——————处理服务类型}writeln;writeln('Totalis',total:10:2
6、);end.例题:从键盘上读入年和月,输出该月有多少天。programpcase2;varyear,month,day:integer;runnian:boolean;beginwrite('Enteryearandmonth:');readln(year,month); casemonthof 1,3,5,7,8,10,12:day:=31; 4,6,9,11:day:=30;{————以上处理31天和30天的情况} 2:beginrunnian:=(yearmod400=0)or((yearmod4=0)and(yea
7、rmod100<>0)); caserunnianof true:day:=28; false:day:=29; end; end;{————以上处理2月的情况:闰年28天,平年29天} end;end.vara:real;begina:=15/8;writeln(a);writeln(a:0:2);writeln(a:0:0);end.{输出1.8750