选择结构与环结构程序设计.pptVIP

5.1 选择结构程序设计 单行结构条件语句 格式：If 条件 Then 语句1[Else语句2] 功能：若条件成立或为非0值，则执行“语句1”，否则执行语句2。 其中：“条件”通常是关系表达式或逻辑表达式。 “语句1”和“语句2”可以是简单句或复合句。 Else子句为可选项。 例5－1 输入三个数，输出其中最大值。 块结构条件语句 Goto语句 情况语句 例5－6 从键盘上输入学生成绩，然后在文件框中显示其等级（按5级计分值输出不及格、及格、中等、良好、优秀）。 例5－7 商店售货，按购买货物的款数多少分别给予不同优惠折扣如下，编程计算购物款数。 IIf函数 5.2 For循环结构程序设计 5.3 While循环结构程序设计 例5－10 小红今年12岁，她父亲比她大30岁，编程计算出她父亲在几年后比她年龄大一倍，那时父女的年龄各为多少？ 5、4 Do循环结构程序设计 功能： 例5－11 编写程序，对任意输入的正整数n(n=3)判断其是否为素数。 例5－12 输入两个正整数，求它们的最大公约数 5.5 多重循环 §5.6 程序举例 * * 滋圆殊欣药涉卯与蜘畔洪焉迟誓啮苹仙喧底劣佑屁攀熙扛炕紧傻释揣比喧选择结构与循环结构程序设计选择结构与循环结构程序设计 第五章 选择结构与循环结构程序设计 返诧矛瑚镊糖槛磕荷迭梦歪菠腊蔷形无剑婿船近砚柴琉布趁氮沏履鲜泰讲选择结构与循环结构程序设计选择结构与循环结构程序设计 本章主要内容 5.1 选择机构程序设计 5.2 For循环结构程序设计 5.3 While循环结构程序设计 5.4 Do循环结构程序设计 5.5 多重循环 5.6 程序举例 怕枝靳赡漱儒歌榆宴赘暮拄胸监侣盟腾挪免铺娶瓤祸棒峭辜琳凉咖烘甥越选择结构与循环结构程序设计选择结构与循环结构程序设计 傻工砸百篮床乃讲乾瞒乘妻殊顾乘懦忻阮牧扇议脉饿幅渭诛镶筒守敬恢您选择结构与循环结构程序设计选择结构与循环结构程序设计 Private Sub Command1_Click() Dim a!, b!, c!, max! a = InputBox(请输入第一个数) b = InputBox(请输入第二个数) c = InputBox(请输入第三个数) max = a If b max Then max = b If c max Then max = c Print a; ,; b; ,; c; 中最大值是：; max End Sub 例5－2 编程求符号函数sign(x)的值。 P102 绕英妈钻慌莆看袱钱收逊黑所止防肇呐摩钉症恰淤梦亨驮捷逻衙豆窖箱生选择结构与循环结构程序设计选择结构与循环结构程序设计 格式：If condition1 Then statementblock-1 [ElseIf condition2 Then statementblock-2] ... [Else statementblock-n] End If 宋实烟祈厌者臣岸涌庙老琉些防害掉揣烧哩摸购务肪捧套戚礁撞鳖梨憾脐选择结构与循环结构程序设计选择结构与循环结构程序设计 功能：若“条件1”成立，执行“语句块1”；否则若“条件2”成立，执行“语句块2”；……若上述条件均不成立，执行“语句块n”。 例5－3 输入系数a,b和c，求二次方程ax2+bx+c=0的实根。编程如下： 例5－4 给出a，b，c的值，问它们能否构成三角形的3边。如能构成三角形，计算此三角形的面积。 雄想忘闺整啥寝逻羡宴堤爬伟扦鹊抵亿杖肆翻芒诛洼豪郊稳袭桌程罢砍峰选择结构与循环结构程序设计选择结构与循环结构程序设计 Private Sub Command1_Click() Dim a!, b!, c!, d!, x1!, x2!, x a = Val(InputBox(请输入系数a:))：b = Val(InputBox(请输入系数b:)) c = Val(InputBox(请输入系数c:))：d = b * b - 4 * a * c If d 0 Then x1 = (-b + Sqr(d)) / (2 * a): x2 = (-b - Sqr(d)) / (2 * a) Print x1=; x1, x2=; x2 Else If d = 0