(20)--4-3-1 选择结构导入程序设计.pptVIP

4-3-1 选择结构导入Visual Basic程序设计 本节内容问题1概述1问题232问题34 人们经常要求计算机根据给定的条件进行分析、比较和判断，并根据判断结果采取不同的操作。例如求|x|这样的问题，VB是通过选择结构来解决的。VB中的选择结构主要通过If条件语句和Select情况语句来实现。它们都是对条件进行判断，根据判断结果，选择执行不同的分支。 1. 概述 2. 问题1【问题1】从键盘上输入三角形3边a,b,c，对能构成三角形的求其面积。分析：该问题的算法步骤如下：步骤一：从键盘上任意输入三个整数，用a、b、c存储；步骤二：判断a、b、c是否满足构成三角形的前提条件，两边之和大于第三边；步骤三：如果满足，则先求出s=(a+b+c)/2；调用海伦公式，求出三角形面积。abcArea？ 2. 问题1【问题1】从键盘上输入三角形3边a,b,c，对能构成三角形的求其面积。分析：构成三角形的前提条件是两边之和大于第三边边长合理的条件用表达式如何表示？a+b>c and a+c>b and b+c>a 2. 问题1【问题1】从键盘上输入三角形3边a,b,c，对能构成三角形的求其面积。单分支结构输入三条边长边长合理？计算面积并显示TrueFalse 2. 问题1【问题1】从键盘上输入三角形3边a,b,c，对能构成三角形的求其面积。If a + b > c And a + c > b And b + c > a Then End If s = (a + b + c) / 2 area = Sqr(s * (s - a) * (s - b) * (s - c)) Label4.Caption = "三角形的面积=" & area边长不合理时会怎样反应？ 3. 问题2【问题2】输入三角形3边a,b,c，能否在输入边长不合理的情况下，给出相应的友好提示？If a + b > c And a + c > b And b + c > a ThenElseEnd If边长合理时的操作边长不合理时的提示 s = (a + b + c) / 2 area = Sqr(s * (s - a) * (s - b) * (s - c)) Label4.Caption = "三角形的面积=" & area Label4.Caption = "不能构成三角形"双分支结构 4. 问题3【问题3】输入三角形3边a,b,c，判断是何种类型三角形？不合理边长、等边、等腰、任意 4. 问题3输入三条边长边长不合理？提示信息TrueFalse等边三角形？TrueFalse等腰三角形？TrueFalse提示信息提示信息提示信息 4. 问题3If Not (a + b > c And a + c > b And b + c > a) Then pd = "不合理边长"ElseIf (a = b And b = c) Then pd = "等边三角形"ElseIf (a = b Or a = c Or b = c) Then pd = "等腰三角形"Else pd = "任意三角形"End If多分支结构 概述问题1问题2问题3模块小结