苏科版初中信息技术选修《选择结构》.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