1、,四、IF 条件语句的嵌套,四、IF 条件语句的嵌套,嵌套格式：,If then 语句 Elseif then语句else语句end if End if,YES,开始,结束,输入全票价m、儿童身高(cm)h,h=130,NO,h=150,m1=m/2,YES,输出儿童票价m1,m1=m,修改程序框图,NO,m1=0,上一课的框图繁琐，甚至可以说是不符合逻辑的。,Private Sub Text2_Change() Dim h as single Dim m as single,m1 as single H=text1.text M=text2.text If h=130 thenm1=0 el
2、seIf h=150 thenm1=m/2elsem1=mEnd if End if Text3.Text = m1 End sub,IF THEN ELSE END IF,四、IF 条件语句的嵌套,输入某学生的成绩，按如下规定给该生加评语：90100为优秀，8089为为良好，7079为一般，6069 为及格，0 59 为不及格,四、IF 条件语句的嵌套,分析：1、从键盘输入一个两位数2、判断它是否是满足要求，在0-100之间，不满足重新输入，如满足判断它所在的区间：90-100，80-89 ，70-79，60-69，0-59 并按要求输出评价,四、IF 条件语句的嵌套,开始,输入学生成绩N,
3、N在0100之间,否,结束,N=90,良好,否,N=80,否,N=70,一般,否,N=60,及格,否,不及格,程序： CLS START: INPUT “A STUS SCORE:” ; S IF S100 THEN GOTO START ELSEIF S=90 THEN PRINT “YOU XIU”ELSE IF S= 80 THENPRINT “LIANGHAO”ELSE IF S= 70 THENPRINT “YI BAN”ELSEIF S= 70 THEN PRINT “JIGE”ELSEPRINT “BU JIGE”END IFEND IFEND IFEND IF END IF E
4、ND,程序开始,返回程序开始,有多少if语句就应该有多少endif,If 条件语句的嵌套（复杂的IF块条件语句）,例题2：输入系数A、B、C ，求解方程AX2+BX+C=0,分析：由题意，可分以下几种情况1、当A=0时，B的情况：B0 时，根为 C/B；B=0时，但C 0时，方程没有解；C=0时，X可为任意值 2、A 0时， D（ ）=B 2 4AC，D0 时， X1=（-B+SQR（D）/（2A）X2=（-B+SQR（D）/（2A）D=0 时， X1=X2=（-B+SQR（D）/（2A）D0时，方程没有解,开始,输入a,b,c,否,是,a=0,b=0,否,X=-c/b,c=0,输出x为任意值
5、,否,X不存在,输出X,(见下一页）,结束,a=0,否,是,(见上一页）,Cls Input “enter a,b,c:”a,b,c If a=0 then if b=0 then if c=0 then print “x is any number.” else print “x is no exist.”elsex=-c/b print “x=“;xend if elsed=b2-2*a*cif d=0 then p=-b/(2*a)q=sqr(d)/(2*a)x1=p+qx2=p-qprint “x1=“;x1print “x2=“;x2elseprint “ther is no real root.” End if End if,
