课件32张PPT。选择结构设计粤教版教材《信息技术(选修1) 算法与程序设计》第二章第三节 课堂活动 请同学们选择一个按钮,并完成按钮下的任务(或游戏)。生活中还有很多涉及到选择的例子……比赛选手晋级规则的设定:
【问题分析】
每位选手有能力分、表现分、应变分三项,选手成绩为三项单项成绩的总分。当总分高于210分,则该选手晋级,否则淘汰。
生活中的选择 机器人行走问题:
问题分析:
打开远红外检测程序进行测障,
若有障碍,则转弯,若无障碍,前进
生活中的选择 生活中还有很多其它的选择,比如方程的求解、某项决策的制定、等级的划分……那么,这些选择在程序中如何实现呢? 生活中的选择 Private sub command1_Click()
Dim max As Integer, a As Integer , b As Integer
a=inputbox(“请输入第一个数:”) b=inputbox(“请输入第二个数:”)
print ”这两个数的最大值为”&max
End subIf a>b Then max=a Else max=b读程序1,找出选择结构的句式初试锋芒 Private sub command1_Click()
Dim password As Integer, p As Integer
password=999
p=inputbox(“请输入一个三位数密码:”)
End subIf p=password Then print “恭喜你,密码正确!”
Else
print“密码错误!请重新输入!”
End if读程序2,找出选择结构的句式初试锋芒 内容讲授1 1、VB中的选择结构(第一种表示)举例:求解x的绝对值,结果用y来表示If x>=0 then y=x Else y=-xy=x
If x<0 then y=-x方法一:方法二:条语句内容讲授1 采用此种格式书写时,当语句组多于一句时,语句间用”: ”分隔,如:If x>=0 then y=x : print “非负” else: y=-x : print “负数” ①②③④注意: ”: ” 的作用是 断句内容讲授1 1、VB中的选择结构(第二种表示)If x>=0 Then
y=x
print “非负,绝对值为”;y
Else
y=-x
print “负数,绝对值为”;y
End if块语句屏幕练习1 求解一个数的绝对值 Private sub command1_Click()
Dim n As Integer, y As Integer
n=inputbox(“请输入一个随机数:”)
If __________ Then
y=________________
Else
y=________________
End if
print ”该数的绝对值为”; y
End subn>=0n-n 注意If和End if的配对!!!!!! 选择结构实质上是设置某种规则,根据对规则的判断来选择某部分操作。 条件判断即关系的判断内容讲授2 2、VB中的关系表达式关系表达式的值为逻辑值,即真(true)和假(false)。5>7 12< >21 85>=70 “A”< ”B” “a” = ”A”真真真假假屏幕练习2 Private sub command1_Click()
Dim d1 As Single, d2 As Single, d3 As Single
Dim sum As Single
d1=inputbox(“请输入第一项单项分数:”)
d2=inputbox(“请输入第二项单项分数:”)
d3=inputbox(“请输入第三项单项分数:”)
sum =d1+d2+d3
If _________ Then
________________ ‘输出晋级信息
Else
________________ ‘输出淘汰信息
End if
End sub 比赛选手晋级程序,三项单项成绩的总分高于210分晋级,否则淘汰。sum>210print“该选手晋级!”print“该选手淘汰!” 若将前一个选手晋级程序中的条件改为“总分大于210且第一成绩不低于80”,则需判断的条件为:sum>210d1>=80同时成立内容讲授3 3、VB中的逻辑表达式用逻辑运算符把关系表达式连接起来就成为了逻辑表达式,逻辑表达式的值只有真(true)和假(false)。常用的逻辑运算符有屏幕练习3 sum>210 And d1>=80因此,选手晋级程序的条件判断应该写为:AndOrNot课堂练习逻辑运算符的操作 真真假假真假假真真假假真课堂练习用vb语言表示下列关系:(1)函数 ,什么时候y>0。(2)直线 与 平行。(3)力fa与fb的合力的范围,用F来表示(已知fa>fb)x<-3 Or x>3a=c And b<>dF>=a-b And F<=a+b 提示:水仙花数是指各个位数上的立方和刚好为此数数值。比如153,刚好可以表示为153=13+53+33小试身手 分析:需要编写一个判断水仙花数的程序,用户从键盘随机输入一个三位整数,程序进行判断,若其是一个水仙花数,则输出“该数是一个水仙花数”,否则输出“该数不是水仙花数!”找出下列数字中哪个不是水仙花数?407 521 370 371作业讲解 作业讲解 Private sub command1_Click()
Dim n As Integer, d1 As Integer, d2 As Integer, d3 As Integer
n=inputbox(“请输入一个三位数:”)
d1=n 100 ‘整除100来,拆出百位
d2=n 10 mod 10 ‘整除10,得到前两位,再对10取余,得到十位
d3=n mod 10 ‘对10取余,得到个位
If n=d1^3+d2^3+d3^3 Then
Print n;”是一个水仙花数”
Else
Print n;”不是一个水仙花数”
End if
End sub作业讲解 输入的不是三位数再加一个判断知识拓展 Private sub command1_Click()
Dim n As Integer, d1 As Integer, d2 As Integer, d3 As Integer
n=inputbox(“请输入一个三位数:”)
If n>=100 And n<=999 Then
d1=n 100 ‘整除100来,拆出百位
d2=n 10 mod 10 ‘整除10,得到前两位,再对10取余,得到十位
d3=n mod 10 ‘对10取余,得到个位
If n=d1^3+d2^3+d3^3 Then
Print n;”是一个水仙花数”
Else
Print n;”不是一个水仙花数”
End if
Else
Print “输入的不是有效的三位数!”
End If
End sub总 结 本节知识要点:1、VB中的选择结构 If Then 语句组1 Else 语句组2条件 2、学会用关系表达式表示判断条件>、<、=、>=、<=、<>3、复杂关系的表示——逻辑运算符AND、OR、NOT谢谢!Exit活动1中英文翻译:将下面的汉语翻译成英文:如果明天不下雨,我们就去野餐,否则我们在家呆着。返 回选择1 选择2 活动2看商品,猜价格:返 回提示:300~500之间的一个整数价位,教师会根据同学们的回答提示高了或低了猜价过程:教师有两个选择(高或低)来给出提示
学生根据提示选择另一个合适价位回答 活动3计算自己的体质指数计算方法如下:返 回体质指数BMI=体重(kg)/身高2(m)查看过程——选择性别——选择指数范围——对应结果~~点击查看结果~~活动4语文造句用如果……那么……否则……造句。返 回如果……那么……否则…… 其本身就是一种选择。体质指数测试结果参照表点击此处返回附录1