浙教版（2020）信息技术八上 2.7 多分支结构的应用实例 一课一练（含答案）.docx

《浙教版（2020）信息技术八上 2.7 多分支结构的应用实例 一课一练（含答案）.docx》由会员分享，可在线阅读，更多相关《浙教版（2020）信息技术八上 2.7 多分支结构的应用实例 一课一练（含答案）.docx（12页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、2.7多分支结构的应用实例一课一练一、填空题1.变量a，b，c分别保存一元二次方程的二次项、一次项系数和常数项（其中a0），变量x1和x2分别保存方程的两个根。完善下列程序，使程序运行时能根据方程的a，b，c值计算根并输出相应信息。 dif d0 then x1= (-b + Sqr(d) / (2 * a) x2= text4.text=str(x1) text5.text=str(x2) label6.caption=“有两个不同的实数根”else if then x1(-b)/(2*a) x2=x1 text4.text=str(x1) text5.text=str(x2) label6

2、.caption=“有两个相同的实数根” else text4.text= text5.text= label6.caption= end ifend if2.下面的程序用于根据文本框x中输入的内容进行以下处理： 若x中的值为2，4，6，则打印“x的值为2，4，6”； 若x中的值为10到20之间的数，则打印“x的值为1020”；若x中的值为大于20的数，则打印“x 的值大于20”；否则，打印“x不在范围内”； Private Sub Command1_Click() x = Val(Text1.Text) Select Case x Case Print x的值为2，4，6 Case Prin

3、t x的值为1020 Case Print x的值大于20 Print x不在范围内 End SelectEnd Sub3.阅读程序写结果。 year=2021if (year%400=0) or ( year%4=0 and year%100！=0 )： days=366else： days=365print(days)程序运行结果是：_。a=88b=48c=a/bIf c=0： c=a*10+b elif 1=c=9： c=a*100+belif 10=c=99： c=a*1000+bprint(c)程序运行结果是：_。for i in range(1，10，2)： print(iend=

4、 ) 程序段执行结果是：_。for i in range(1，100)： if i%3=0 and i%7=0： print(iend= )程序段执行的结果是：_。二、单选题4.小度在学习了VB语言后，对程序设计产生了浓厚的兴趣。电脑课上，小度编写了一个如图11所示的汽车停车收费的VB程序，若停车时间在12小时以内，收费10元；停车超过12小时，则每超过1小时加收1元。聪明的你，能对小度的程序进行分析吗？ 1 Dim time, price As Integer time代表停车时间price代表停车费用2 time = Text1. Text 在文本框输入停车时间3 If time 0”B.

5、程序的第3行，改为“If time0 and time 0 or time 0 or time = b b = a * a + 2 * b End If Label1.Caption = Str(b)End SubA.If语句缺少ThenB.If语句缺少ElseC.变量a的数据类型说明错误D.变量b的数据类型说明错误6.当在文本框Text1中输入3时，执行下面的程序后，Y的值是（ ） x=Val(Text1. Text)If x=2 Theny=2ElseIf x0 Then x=y-3 Else y=x+3 Print x-y; y-x A.-3 3B.5 -9C.3 -3D.-6 510.

6、下图所示的程序框图，能判断任意输入的数x的奇偶性，其中判断框内的条件是（ ） A.m=0B.x=0C.m=1D.x=111.下列程序运行后，变量y的值是( )。 x=10if x=90： print(A)elif score=80： print(B)elif score=70： print(C)elif score=60： print(D)else： print(E)A.AB.BC.CD.D13.下面程序运行的结果是( ) i=1sum=0while i5 then if b3 then c=a*b else c= a mod b End ifEnd ifA.2B.-2C.6D.115.如下一

7、段VB程序运行后，变量a的值为（ ）。 Dim i As Integer, a As Integeri=6a=6 If i J Then Print I Else Print JA.10B.20C.1020D.201017.求1-100之间所有偶数和，请补充完成方框处代码( )。 s=0for i in range(101)： If : s=s+iprint (s)A.i/2=0B.i%2=0C.i%2=0D.i/2=018.根据下图回答下面小题 （1）.在Python中运行图中的程序，得到的结果是（ ）。 A.21 15B.15 21C.15 0D.0 21（2）.题中的程序是（ ）结构。

8、A.逻辑B.顺序C.循环D.分支（3）.Python中，（ ）一旦创建就不可修改的。 A.列表B.元组C.字典D.集合三、解答题19.近年来网络技术的迅猛发展，网络购物已经成为当下最热门的购物渠道。小明同学在网购平台上看中了五双运动鞋，想在这五双中选择一双购买（原价和折扣详见商品折扣表）。但是小明的预算是不超过200元，更省钱最好，请你为小明设计一款软件，选择购买哪一双运动鞋最实惠。 商品折扣表：商品名称原价折扣力度篮球鞋001488元4折篮球鞋002458元5折跑步鞋001398元5折跑步鞋002358元6折徒步鞋001339元6折软件设计要求：（如图） 新建一个VB工程，完成“折扣商品计算

9、器”程序的设计。将工程文件以sale.vbp、窗体文件以sale.frm保存到考试目录“操作题”下；窗体的标题为“折扣商品计算器”；窗体的左边有三个标签，Label1的属性为“商品原价a:”、Label2的属性为“折扣力度b:”、 Label3的属性为“折后价格c:”；它们的旁边分别有三个文本框，Text1用于商品原价、Text2用于输入折扣力度、Text3用于输出折后价格；在文本框的右边有三个标签，Label4的属性为“元”、Label5的属性为“折”、 Label6的属性为“元”； 单击“计算”按钮(Command1)，根据计算公式将相应的提示信息显示在标签Text3中；计算公式为：折后价

10、格=商品原价*折扣力度；如果折后价格不高于200元，MsgBox函数提示“可以购买！”；如果折后价格高于200元，MsgBox函数提示“对不起！买不起，请您放弃！”。请编程实现。结论：最适合小明的运动鞋是什么。请填写商品名称20.设计一个计算程序。该程序用户界面自己设计，由四个文本框：文本框1（text1，语文）、文本框2（text2，数学）、文本框3（text3，英语）、文本框4（text4，平均分），和三个按钮：命令按钮1（command1，清空）、命令按钮2（command2，计算）、命令按钮3（command4，退出）组成。程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按

11、钮，则计算三科平均成绩。单击退出按钮则退出。 答案解析部分一、填空题1. b*b-4*a*c；(-b - Sqr(d) / (2 * a)；d=0；“ ”；无实根 2. Is = 2,4,6；Is 10 ,Is 20；Case Else 3. 365；8848；1 3 5 7 9；21 42 63 84 二、单选题4. （1）A（2）B（3）B（4）B 5. A 6. B 7. D 8. C 9. A 10. C 11. C 12. C 13. D 14. D 15. A 16. B 17. C 18. （1）B（2）D（3）B 三、解答题19. 4 结论篮球鞋001完整程序：写法1：Priv

12、ate Sub Command1_Click() Dim a As Single, b As Single, c As Single a = Val(Text1.Text) b = Val(Text2.Text) c = a * b / 10 Text3.Text = Str(c)If c 200 Then MsgBox (对不起！买不起，请您放弃！ ) Else MsgBox (可以购买！) End IfEnd Sub20. 解：程序参考： Private Sub Command1_Click() Text1.Text = Text2.Text = Text3.Text = End SubPrivate Sub Command2_Click() If Text1. Text= Or Text2.Text= Or Text3.Text= Then MsgBox 成绩输入不全！ Else Text4.Text=(Val(Text1.Text)+Val(Text2.Text)+Val(Text3.Text)/3 End IfSub End Private Sub Command3_Click() Unload MeEnd Sub