沪科版 信息技术 选修1 活动一 用IF语句实现简单选择结构 (共22张ppt)

Print "A" Else
If cj >= 80 Then Print "B"
Else If cj >= 70 Then Print "C" Else If cj >= 60 Then Print "D" Else Print "E" End If End If
End If End If End Sub
二、分支结构（条件语句）程序设计
1、简单IF语句
IF 条件 THEN
语句组
ENDIF
2、IF/Then/Else语句 IF 条件 THEN
语句组1
ELSE
语句组2
3、IF语句的嵌套
ENDIF
作业：P73 1-5题
分支结构（条件语句）程序设计
1、简单IF语句
格式
流程图
IF 条件 THEN
语句组
ENDIF
小节
一、控制条件 （一）关系运算符和关系表达式
1、关系运算符 > < = <> >= <= 关系运算没有优先顺序
2、关系表达式 （二）逻辑运算符和逻辑表达式
1、逻辑运算符 AND NOT OR 2、逻辑表达式 3、逻辑运算符的优先顺序： NOT→AND→OR （三）混合运算的优先级 算术运算→ 字符串运算→关系运算→逻辑运算
当a=1,b=-8,c=3时 输出结果是：
True
二、分支结构（条件语句）程序设计
1、简单IF语句
格式
流程图
IF 条件 THEN
语句组
ENDIF
功能：如果条件成立(为真)， 那么执行THEN后面的语句组， 否则执行ENDIF以后的语句
条件成立
语句组
例1： 输入一个数，如果这个数不等于零，
那么输出它的倒数，否则不显示。
相当于数学中的或
2、逻辑表达式
条件
表达式
60≤x<70
（x>=60）and (x<70)
A、B、C为三角形三条边， 该三角形为等腰三角形的条件 (A=B) OR (A=C) OR (B=C)
X、Y、Z三个数中X为最 大者的条件
(X>Y) AND (X>Z)
3、逻辑运算符的优先顺序 NOT→AND→OR
A=3
B=2
C=1
D=a=c
Print d Print a=b, c+1=b, c=2 End Sub
运行结果为： False
False
True
True
（二）逻辑运算符和逻辑表达式
1、逻辑运算符
逻辑运算符 NOT AND OR
名称
含义
逻辑非
相当于数学中的否定
逻辑乘（逻辑与） 相当于数学中的且
逻辑或
功能：如果条件成立(为真)， 那么执行THEN后面的语句组， 否则执行ENDIF以后的语句
条件成立
语句组
例1： 输入一个数，如果这个数不等于零，
那么输出它的倒数，否则不显示。
算法
程序
1、输入X 2、判断是否x<>0？
是则（1）Y←1/x （2）输出Y
否则直接结束 3、结束
Private Sub Form_click() Dim x As Single Dim y As Single x = InputBox("x=") If x <> 0 Then
内嵌 IF语句
内嵌 IF语句
例3：
将百分制的分数 转化为等级。分数 ≥90以上为A等； 分 数≥80且小于90为B 等； 分数≥70且小 于80为C等； 分数 ≥60且小于70为D等； 分数小于60为F等。
Private Sub Form_click() Dim cj As Single cj = Val(InputBox("a=")) If cj >= 90 Then
编程求解。
Private Sub Form_click() Dim a As Single, b As Single, c As Single Dim d As Single, x1 As Single, x2 As Single a = InputBox("a="): b = InputBox("b="): c = InputBox("b=") d=b^2-4*a*c If d >= 0 Then
有一逻辑表达式如：a Or b And Not c
此表达式首先执行Not c，再将其结果与b与运算， 最后将结果与a进行或运算。其运算顺序如图：
a Or b And Not c
课堂练习一
A
B
Not A A and B A or B
真
真
假
真
真
假
真
真
假
真
真
假
假
假
真
假
假
真
假
假
（三）混合运算的优先级 算术运算→ 字符串运算→关系运算→逻辑运算 例： c+a>b+5 Or a<c-5 And c>0
当程序面临多项选择 的时候，可以通过IF语句 的嵌套实现多分支结构。 IF语句的嵌套指在一个If语 句中又包含一个或多个IF 语句，其一般形式如右：
IF 条件 Then IF 条件 Then 语句组1
Else 语句组2
ENDIF
Else IF 条件 Then 语句组1
Else 语句组2
ENDIF
ENDIF
在解决一个较复杂的实际问题时，往往需要根据某 些条件作出判断，或是有条件地执行某一操作。计算机
程序中的选择结构能让程序根据不同的情况，执行不
同的程序段，得到不同的结果。
一、控制条件
（一）关系运算符和关系表达式 1、关系运算符
关系运算符 = <> > < >= <=
数学运算符 = ≠ > < ≥ ≤
算法
程序
1、输入X 2、判断是否x<>0？
是则（1）Y←1/x （2）输出Y
否则直接结束 3、结束
Private Sub Form_click() Dim x As Single Dim y As Single x = InputBox("x=") If x <> 0 Then
y=1/x Print "y="; y End If End Sub
意义 等于 不等于 大于 小于 大于或等于 小于或等于
举例 X=Y X<>Y X>Y X<Y X>=Y X<=Y
2、关系表达式 条件
在同一表达式中 有多种运算符， 先做算术运算，
再做关系运算。 关系式
X与Y的和大于3 一元二次方程的判别式小于0 N为偶数 字符串变量N$的值不是ZHENG
X+Y>3 B^2-4*A*C<0 N/2=INT(N/2) N$<>”ZHENG”
x1 = (-b + Sqr(b ^ 2 - 4 * a * c)) / (2*a) x2 = (-b - Sqr(b ^ 2 - 4 * a * c)) / (2*a) Print "x1="; x1, "x2="; x2 Else Print "无实根" End If End Sub
x1 = (-b + Sqr(b ^ 2 - 4 * a * c)) / (2*a) x2 = (-b - Sqr(b ^ 2 - 4 * a * c)) / (2*a) Print "x1="; x1, "x2="; x2 Else Print "无实根" End If End Sub
3、IF语句的嵌套
2、IF/Then/Else语句
格式
IF 条件 THEN
语句组1
ELSE
语句组2
ENDIF
流程图
条件成立
语句组1
语句组2
功能：如果条件成立(为真)， 那么执行THEN后面的语句组， 否则执行Else以后的语句
例2： 输入一元二次方程aX2+bX+C的三个系数，
编程求解。
Private Sub Form_click() Dim a As Single, b As Single, c As Single Dim d As Single, x1 As Single, x2 As Single a = InputBox("a="): b = InputBox("b="): c = InputBox("b=") d=b^2-4*a*c If d >= 0 Then
y=1/x Print "y="; y End If End Sub
2、IF/Then/Else语句
格式
IF 条件 THEN
语句组1
ELSE
语句组2
ENDIF
流程图
条件成立
语句组1
语句组2
功能：如果条件成立(为真)， 那么执行THEN后面的语句组， 否则执行Else以后的语句
例2： 输入一元二次方程aX2+bX+C的三个系数，
关系表达式的值只有两个，即真和假。在VB中真 显示为“True”表示，假显示“False”表示。
课堂练习一
阅读以下程序，写出运行结果
Private Sub Form_Click()
Dim a As Integer, b As Integer, c As Integer