2020版高考信息技术一轮浙江专用版 第八单元 算法及VB语言基础（课件+习题，22份打包）

第八单元　算法及VB语言基础 单元小结 知识系统构建 / 第八单元　算法及VB语言基础 单元检测题组 /时间:40分钟　　/分值:65分 一、选择题(每题3分,共42分) 1.(2019浙江十二校高三第一次联考,5,3分)某流程图如图所示: / 若输入k的值为9,最终i、s的值分别为(　　) A.11　0 B. 11　-11 C. 9　0 D. 9　-9 答案　B　本题考查循环结构流程图。各变量在执行过程中变化如下: 变量 k i s 进循环前 9 1 0 第一次循环后 9 3 0+3 第二次循环后 9 5 0+3-5 第三次循环后 9 7 0+3-5-7 第四次循环后 9 9 0+3-5-7+9 第五次循环后 9 11 0+3-5-7+9-11 退出循环 2.(2019浙江名校新高考研究联盟第一次联考,6,3分)某算法的部分流程图如图所示。执行这部分流程后,输出m的值是(　　) / 　　　　　　 　　　　　　 　　　　　　 A.0 B. 1 C.2 D.9 答案　D　本题考查循环结构流程图。各变量变化如下: 变量 x y m 进循环前 192 0 0 第一次循环后 19 2 2 第二次循环后 1 9 9 第三次循环后 0 1 9 退出循环 本程序本质上是找出数值x的各位数中值最大的那位数。 3.在Visual Basic中,能表示整数x是完全平方数(如9=3*3,9是完全平方数)的表达式是(　　) A.x^2=x*x B.sqr(x)=x2 C.int(sqr(x))^2=x D.(x2)^2=x 答案　C　本题考查VB基本函数的应用。Sqr(x)是开平方函数,Int(x)是取不大于x的最大整数。根据题意可知选C。 4.有如下程序: Private Sub Command1_Click() 　　Dim a(5) as Integer 　　Dim n as Integer, i as Integer 　　n = Val(Text1.Text) 　　i = 0 　　a(1) = 1 　　a(2) = 1 　　For i = 3 To n 　　　　a(i) = a(i-1) + a(i-2) 　　Next i 　　Label1.Caption = a(i) End Sub 若在Text1中输入5,则点击按钮后的运行结果为(　　) A.Label1中输出5 B.Label1中输出10 C.报“下标越界”错误 D.Label1中无内容 答案　C　本题考查对VB循环语句和数组的掌握。当输入5时,首先初始化数组元素a(1)为1,a(2)为1,进入For循环,第一次循环i为3,计算出a(3)的值为a(1)+a(2)=2,i的值加1,第二次循环计算出a(4)的值为3,i的值加1,第三次循环计算出a(5)的值为5,i的值加1,最后跳出循环,i的值为6,a(5)的值为5。而程序要求输出a(6),但是由定义语句Dim a(5) as Integer可知a数组的范围是0~ 5,所以不存在下标为6的数组元素a(6),属于数组下标越界错误。 5.用VB模拟设计某软件的登录界面,如图所示,当鼠标单击“<请输入账号>”所在的文本框Text1时,文字内容消失。则此事件处理的过程名应该是(　　) / A.登录窗口_Click B.Text1_KeyPress C.Command1_Click D.Text1_Click 答案　D　本题考查对VB事件的掌握。点击文本框Text1的事件名为Text1_Click,其中Text1为文本框的名称,Click代表是点击事件。 6.(2019浙江十二校高三第一次联考,11,3分)有如下VB程序段: Dim i As Integer, Sum As Integer Dim a(l To 6) As Integer, b(l To 6) As Integer Sum = 0 a(6) = 18: a(5) = 7: b(6) = 14: b(5) = 16 For i = 4 To 1 Step -1 　a(i) = a(i + 2)-a(i + 1) 　b(i) = b(i + 2)-a(i) 　If b(i) Mod 3 = 0 Then Sum = Sum + b(i) Next i Textl .Text = Str(Sum) 该程序段运行后,文本框text1中显示的内容是(　　) A.39 B. 30 C. -9 D. 12 答案　B　本题考查数组的运算。当i=4时,计算得到a(4)=a(6)-a(5)=18-7=11, b(4)=b(6)-a(4)=14-11=3,得到sum=3;当i=3时,计算得到a(3)=a(5)-a(4)=7-11=-4, b(3)=b(5)-a(3)=16-(-4)=20,sum仍然是3;当i=2时,计算得到b(2)=b(4)-a(2) =3-15=-12,得到sum=3-12=-9;当i=1时,计算得到a(1)=a(3)-a(2)=-4-15=-19, b(1)=b(3)-a(1)=20-(-19)=39,得到sum=-9+39=30。 7.在Visual Basic中,有如下程序: Private Sub Command1_Click() 　Dim a As Integer,b As Integer,c As I ... ...