程序的结构一.ppt

* * 第二讲　程序的三种基本结构 刘建国 昌邑市卜庄初中 一、顺序结构 二、选择结构 (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. 无“；” 二、选择结构 (一)关系运算、逻辑运算及布尔表达式 1.关系运算符（表示数值大小关系的运算符号） 运算符　　　运算　　　　　　　　结果类型　　=　　　　等于　　　　　　　　　布尔型　　　　　 不等于　　　　　　　　布尔型　　　　　　小于　　　　　　　　　布尔型　　　　　　大于　　　　　　　　　布尔型　　=　　　 小于等于　　　　　　　布尔型　　=　　　 大于等于　　　　　　　布尔型 如：a:=1;b:=2; 则表达式：a=b的值是TRUE；ab的值是FALSE； a+1=b的值是TRUE； Var f：boolean； f：=ab; Write（f）; 输出：FALSE 数据类型：布尔型 （boolean） 　　一个布尔型数据用来存放逻辑值（布尔值）。布尔型的值只有两个：false(错误)和true（正确），并且false的序号是0，true的序号是1。false 和true都是预定义常数标识符，分别表示逻辑假和逻辑真。并且truefalse。boolean是布尔型的标识符。如： var a，b：boolean； 2、逻辑运算 (布尔运算) 　运算符　　　运算　　　　 运算对象　　　　结果类型　　not　　　逻辑非（取反）　　布尔型　　　　　布尔型　　and　　 逻辑与（并且）　　布尔型　　　　　布尔型　　or　　　 逻辑或（或者）　　布尔型　　　　　布尔型　　xor　　　逻辑异或　　　 布尔型　　　　　布尔型 如：a：=1；b：=2；c:=3; 1）、Not(ab) 2）、（ab）and （bc）3）、（ab）and （bc）4）、（ab）or （bc） 5）、（ab）or（bc）6）、（ab）xor（bc）7）、（ab）xor（bc） 布尔表达式：由关系运算符和逻辑运算符连接成的表达式。结果是布尔类型：TRUE或FALSE （二）、选择结构：if 语句　　有两种形式的IF语句：　　(1) if 布尔表达式 then 语句；　　(2) if 布尔表达式 then 语句1 else ? 语句2； IF语句是由一个布尔表达式和一个或两个供选择的操作序列组成。运行时根据布尔表达式的求值结果，选取其中之一的操作序列执行。 　　当布尔表达式的值为TRUE，则执行then后面的语句，值为FALSE 时有两种情况： （1）什么也不做；（2）执行else后面的语句。 注意: 1、else前面的语句不能有分号；2：如果语句部分是复合语句（多于一条语句），则必须用begin与end括起来。 例1:输入一个整数ａ，判断他的奇偶性。 （是偶数输出“ｙｅｓ”，奇数输出“ｎｏ”）。 方法一： Var a:integer; B