苏科版初中信息技术选修《选择结构》.pptVIP

第二讲 选择结构 程序的三种基本结构： 顺序结构 选择结构（if 、case） 循环结构（for、while、repeat） 例：输入三角形的三条边a，b，c，输出三角形的面积。（a，b，c是正整数100，满足三角形条件） 一、顺序结构 var a,b,c:integer; p,s:real; begin readln(a,b,c); p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln(s:0:2); end. 程序从第一句开始，依次顺序执行语句直到结束，中间无分支和循环，这种程序结构称为顺序结构 Readln(a,b,c) 读入边长 求p 求s 输出面积s 流程图 改进： 输入三角形的三条边a，b，c，如果能构成三角形则输出三角形的面积;如果不能构成三角形则输出提示信息”No answer”. Readln(a,b,c) 读入边长 A,b,c能否 构成三角形? 求p，s， 输出面积 输出： ‘No answer’ YES NO var a,b,c:integer; p,s:real; begin readln(a,b,c); if (a+bc)and(a+cb)and(b+ca) then begin p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln(s:0:2); end else writeln(‘No answer’); end. 无“；” 选择结构：if 语句　　有两种形式的IF语句：　　(1) if 布尔表达式 then 语句；　　(2) if 布尔表达式 then 语句1 else 语句2； IF语句是由一个布尔表达式和一个或两个供选择的操作序列组成。运行时根据布尔表达式的求值结果，选取其中之一的操作序列执行。 　　当布尔表达式的值为TRUE，则执行then后面的语句，值为FALSE 时有两种情况： （1）什么也不做；（2）执行else后面的语句。 注意: 1、else前面的语句不能有分号；2：如果语句部分是复合语句（多于一条语句），则必须用begin与end括起来。 二、选择结构if /case 布尔表达式：由关系运算符和逻辑运算符连接成的表达式(判断)。结果是布尔类型：TRUE或FALSE 例1:输入一个整数ａ，判断他的奇偶性。 （是偶数输出“ｙｅｓ”，奇数输出“ｎｏ”）。 方法一： Var a:integer; Begin readln(a); If a mod 2 =0 then writeln(‘yes’) ； if a mod 2 0 then writeln(‘no’); End. 方法二： Var a:integer; Begin readln(a); If a mod 2 =0 then writeln(‘yes’) else writeln(‘no’); End. 无“；” 例2、计算下列函数 ，输入x，输出y的值 (精确到小数点后两位小数)。 var x:real; begin readln(x); if x0 then writeln(x*x:0:2) else if x=0 then writeln(0) else writeln(sqrt(x):0:2); end. IF语句的嵌套： 在if语句中，如果then子句或else子句仍是一个if语句， 则称为if语句的嵌套。 var x:real; begin readln(x); if x0 then writeln(x*x:0:2); if x=0 then writeln(0); if x0 then writeln(sqrt(x):0:2); end. 例3：已知方程： ax2+bx+c=0 输入系数a,b,c，a0,输出方程的解(考虑各种情况)。保留两位小数。 (1):如果无实数解输出：’no answer’; (2):相同的实数解：输出一个即可。 (3):两个不同的实数解：分别输出。 如： 输入： 1 3 2 输出： X1=-1.00 X2=-2.00 输入: 2 1 输出: