2011年浙江省信息技术会考算法与程序设计2.docxVIP

选题题（算法） 8、在 Visual Basic 桐乡市第一中学 杜宗飞 2011 年浙江省信息技术会考试题 第 2 套 中，下列能作为变量名的是 （A） If （B） Not （C） Int （D） Flag 9、在 Visual Basic 中，表达式 Sqr(100) + 100 的值是 （A） 110 （B） 103 （C） 200 （D） 100100 10、在 Visual Basic 中，语句 Lab.Caption= 你好 中的“ Lab”是 （A）属性值 （B）对象名 （C）属性名 11、在 Visual Basic 中，语句 Dim x As Single （ D）类名 所说明的变量 x 属于 （A）整数型 （B）逻辑型 （C）字符串型 （D）单精度实数型 12、某 Visual Basic 工程的代码窗口如图所示： 从图中可以看出，当前正在编辑的是 （A） Command1的 Click 事件过程代码 （B） Text1 的 Click 事件过程代码 （C） Form1 的 Click 事件过程代码 （D） Form1 的 Load 事件过程代码 13、有如下 Visual Basic 程序段： k = 1 For j = 2 To 100 If a(j) a(k) Then k = j Next j x = a(k) 该程序段执行后，变量 x 中存储的是 （A） a(1) 至 （B） a(1) 至 （C） a(2) 至 （D） a(2) 至 a(100) 中的最小值 a(100) 中的最大值 a(100) 中的最小值 a(100) 中的最大值 14、为使左、右框内的 Visual Basic 程序段实现相同的功能，可在左框内划线处填写的代 码是 21 2 1 1 2 桐乡市第一中学 杜宗飞 s = 0: t = 1: g = 2 Do While g = 6 t = t * g s = s + t g = g + 1 Loop s = 0: t = 1 t = t * g s = s + t Next g （A） For g = 1 To 6 （B） For s = 2 To 6 （C） For g = 2 To 6 （D） For t = 1 To 6 填空部分 1、有如下 Visual Basic a = 3.14 b= 20 b c = Int(a) + b 该程序段运行后，变量 2、有如下 Visual Basic a = 360 b = Val(a) c = Len(a) If b c Then Label1.Caption = Else Label1.Caption = End If 该程序段运行后，在标签 程序段： c 的值为 ____________。 程序段： 取数值 取字符 Label1 上显示的是 ____________。 3、张松编写了一个用 1 2 3 3 5 主要算法：将问题转化为求 a1 a2 整数 ) 。程序运行界面如图所示，在文本框 “计算”按钮 Command，1 在文本框 Text2 1 2 3 3 5 7 ...求 π近似值的 Visual Basic 程序。 an , 其中 an an 1 Text1 中输入计算项数 中输出 π值。 n 1 (n 2n 1 n （计算到第 为大于 1 的 n 项），单击 桐乡市第一中学 杜宗飞 程序代码如下： Private Sub Command1_Click() Dim n As Integer, i As Integer, j As Double, s As Double n = Val(Text1.Text) j = 1 s = 1 For i = 2 To n j = j * ((i - 1) / (2 * i - 1)) s = ① Next i Text2.Text = ② End Sub （ 1）解决此问题采用的算法是