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

桐乡市第一中学 杜宗飞 2011年浙江省信息技术会考试题 第 2 套 选题题（算法）8、在 Visual Basic中，下列能作为变量名的是 （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）属性名 （D）类名 11、在 Visual Basic中，语句 Dim x As Single所说明的变量 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)至 a(100)中的最小值（B）a(1)至 a(100)中的最大值（C）a(2)至 a(100)中的最小值（D）a(2)至 a(100)中的最大值 14、为使左、右框内的 Visual Basic程序段实现相同的功能，可在左框内划线处填写的代码是 桐乡市第一中学 杜宗飞 （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 c=Int(a)+b 该程序段运行后，变量 c 的值为_。2、有如下 Visual Basic程序段：a=360 b=Val(a)c=Len(a)If b c Then Label1.Caption=取数值 Else Label1.Caption=取字符 End If 该程序段运行后，在标签 Label1上显示的是_。3、张松编写了一个用.73523152313112求 近似值的 Visual Basic程序。主要算法：将问题转化为求naaa212,其中1211nnaann(n为大于 1的整数)。程序运行界面如图所示，在文本框 Text1中输入计算项数 n（计算到第 n 项），单击“计算”按钮 Command1，在文本框 Text2中输出 值。s=0:t=1 t=t*g s=s+t Next g s=0:t=1:g=2 Do While g=6 t=t*g s=s+t g=g+1 Loop 桐乡市第一中学 杜宗飞 程序代码如下：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）解决此问题采用的算法是 。（填：解析算法/递归算法）（2）在程序和划线处填入适当的语句或表达式，将程序补充完整：程序中划线处应填入_。程序中划线处应填入_。操作题 打开考生文件夹下“VB”文件夹中的“test.vbp”，该 VB 程序的功能是：单击“开始”按钮 Command1，小熊开始“滑冰”；单击“停止”按钮 Command2，“滑冰”动作停止；单击“退出”按钮 Command3，结束并退出程序。程序运行界面如图所示：桐乡市第一中学 杜宗飞 完成以下操作：（1）将命令按钮 Command2的 Caption属性值设置为“停止”；（2）为“开始”按钮 Command1添加 Click事件过程，并将“VB”文件夹下“code.txt”文件中的所有代码复制到该事件过程中。调试程序正确，并保存窗体文件 test.frm和工程文件 test.vbp。