高中信息技术算法与程序设计 专项测试二 算法基础

登录二一教育在线组卷平台 助您教考全无忧 高中信息技术算法与程序设计 专项测试二 算法基础 一、选择题 1．某算法的部分流程图如下图所示，执行这部分流程后，输出x，y的值分别是(　　) A．0，3 B．3，1 C．3，0 D．0，35 【答案】C 【知识点】循环结构语句及程序实现 2．某算法的部分流程图如下图所示。 输入x的值为1，执行完这部分流程后，变量s的值是(　　) A．0 B．14 C．20 D．44 【答案】B 【知识点】流程图识读 3．有如下VB程序段： Dim x As String, y As String, z As Boolean x = Text1.Text y = Text2.Text z = x + y > y + x Text3.Text = z 程序运行时，在文本框Text1中输入12121，在文本框Text2中输入121，则在文本框Text3中显示的内容为(　　) A．12121121 B．12112121 C．True D．False 【答案】C 【知识点】运算符、基本运算与表达式；顺序结构及程序实现 4．有如下VB程序段： s = 0: i = 1 Do While i <= 10 If i Mod 3 = 0 Then a(i) = a(i) + 1 Else a(i) = i List1.AddItem Str(a(i)) i = i + 1 Loop i = 10 Do While i >= 1 If a(i) = 1 Then s = s + 1 i = i － 1 Loop 该程序段运行后，变量s值是(　　) A．3 B．4 C．5 D．9 【答案】B 【知识点】常见数据类型、数组；分支结构语句及程序实现；循环结构语句及程序实现 5．有如下VB程序段： Dim d As Integer, p As Integer p = 2 d = 10 Do While d > 1 p = 2 * p d = d － 1 Loop Label1.Caption = Str(p) 该程序段运行后，在标签Label1中显示的内容是(　　) A．2 B．512 C．1024 D．2048 【答案】C 【知识点】循环结构语句及程序实现 6．有如下 VB 程序段： a(1) = 10 For i = 2 To 10 a(i) = 0 If i Mod 2 = 1 Then a(i) = a(i \ 2) + a(i － 1) Else a(i) = a(i) + 1 End If Next i 该程序段执行后，数组元素a(7)的值是(　　) A．2 B．10 C．11 D．12 【答案】D 【知识点】常见数据类型、数组 7．有如下VB程序段： Dim i As Integer, j As Integer, st As String n = 5 For i = 1 To 5 st = “ ” If i < 4 Then For j = 1 To i st = st + “*” Next j Else For j = i To n st = st + “*” Next j End If List1.AddItem st Next i 该程序段运行后，在列表框List1中显示的内容是(　　) A． B． C． D． 【答案】B 【知识点】循环结构语句及程序实现 8．有如下VB程序段： Dim a(1 To 6) As Long, i As Integer, x As Long, y As Long x = 654321 For i = 1 To 6 a(i) = x Mod 10 x = x \ 10 y = y + a(i) * 10 ^ (6 － i + 1) Next i 执行该程序段后，变量y的值为(　　) A．123456 B．1234560 C．6543210 D．654321 【答案】B 【知识点】常见数据类型、数组；循环结构语句及程序实现 9．计算斐波那契数列的前n项。该数列从第 3 项开始，每一项都等于前两项之和，其中第1项为1，第2项也为1。计算前第 n项的 VB程序段如下所示： Private Sub Command1_Click() Dim n As Integer，i As Integer，a As Long，b As Long，c As Long a = 1 b = 1 n = Val(Text1.Text) List1.AddItem Str(a) List1.AddItem Str(b) For i = 3 To n List1.AddItem Str(c) Next i End Sub 上述程序中方框处可选语句为(　　) ①a=b ②c=a+b ③b=c A．①、②、③ B．①、③、② C．③、①、② D．②、①、③ 【答案】D 【知识点】常量、变量及变量的赋值；循环结构语句及程序实现 10．有如下VB程序段： n = 0 For i = 1 To Len(Text1.Text) c = Mid(Text1.Text, i, 1) If c >= “0” And c <= “9” Then m = 1 Else m = 2 a(m) = a(m) + 1 If a(m) = 1 Then n = n + 1 Next i 数组a各元素的初始值都为0，文本框Text1的内容为“Happy2018”。执行程序后，变量n的值为(　　) A ... ...