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

桐乡市第一中学 杜宗飞 2011年浙江省信息技术会考试题 第 1 套 选题题（算法）8、将数学表达式xxcossin21（x 的单位：弧度）写成 Visual Basic表达式，正确的是（A）SinxCosx/2（B）Sinx*Cosx/2（C）Sin(x)Cos(x)/2（D）Sin(x)*Cos(x)/2 9、在 Visual Basic中，下列能作为变量名的是 （A）x+1 （B）x_1 （C）Or （D）If 10、在 Visual Basic中，用变量存储 560位学生的身高数据（如：1.76），下列最合适的变量说明是 （A）将 560个变量说明为整数型（B）将 560个变量说明为单精度实数型（C）将一个元素个数为 560的一维数组说明为整数型（D）将一个元素个数为 560的一维数组说明为单精度实数型 11、在 Visual Basic代码编辑窗口中，输入了“List1.”后出现了如图所示的信息：其中的“BackColor”是 List1的（A）属性名 （B）事件名 （C）对象名 （D）方法 12、有如下 Visual Basic自定义函数：Function f(x As Integer)As Single f=Abs(x)End Function 该函数返回值的数据类型是 （A）整数型 （B）日期型 （C）逻辑型 （D）单精度实数型 13、某 Visual Basic程序的一个事件过程如下：Private Sub Command1_Click()Label1.Caption=welcome!桐乡市第一中学 杜宗飞 End Sub 在程序运行时，能触发该事件的是 （A）窗体装载 （B）单击窗体（C）单击标签 Label1 （D）单击命令按钮 Command1 14、为使左、右框内的 Visual Basic程序段实现相同的功能，可在左框内划线处填写的代码是 （A）g=2 （B）g=6 （C）g=g+1 （D）g=g+2 填空部分 1、有如下 Visual Basic程序段：a=6 b=Hello!c=(a 2)-Len(b)该程序段运行后，变量 c 的值为_。2、有如下 Visual Basic程序段：a=10 b=6 c=5 If a+b c And b+c a And c+a b Then Label1.Caption=YES Else Label1.Caption=NO End If 该程序段运行后，在标签 Label1上显示的是_。3、角谷猜想。对任意一个大于 1 的正整数 n，进行如下运算：若 n 是奇数时，n 的值替换为3n+1，若 n 是偶数时，n 的值替换为 n/2；重复以上运算，n 最终变为 1。下面程序用于验证角谷猜想，程序运行界面如图所示。在文本框 Text1中输入一个正整数，单击“验证”按钮 Command1，在列表框 List1中输出每一步的运算过程。s=0:t=1 For g=2 To 6 t=t*g s=s+t Next g s=0:t=1:g=2 Do While g=6 t=t*g s=s+t _ Loop 桐乡市第一中学 杜宗飞 解决此问题的算法流程图如图所示：程序代码如下：Private Sub Command1_Click()Dim n As Single,i As Integer n=Val(Text1.Text)List1.Clear 清除列表框 List1中的内容 If Int(n)n Or n=1 Then List1.AddItem 请输入大于 1 的正整数！Else i=0 Do While If n Mod 2=0 Then n=桐乡市第一中学 杜宗飞 Else n=n*3+1 End If i=i+1 List1.AddItem Str(i)+Str(n)Loop End If End Sub（1）解决此问题的算法是 。（填：解析算法/对分查找）（2）在程序和划线处，填入适当的语句或表达式，把程序补充完整：程序中划线处应填入_。程序中划线处应填入_。操作题 打开考生文件夹下“VB”文件夹中的“test.vbp”，该 VB 程序的功能是：单击“开始”按钮 Command1，小熊开始“滑冰”；单击“停止”按钮 Command2，“滑冰”动作停止；单击“结束”按钮 Command3，结束并退出程序。程序运行界面如图所示：完成以下操作：（1）将命令按钮 Command3的 Caption属性值设置为“结束”；（2）为“停止”按钮 Command2添加 Click事件过程，并将“VB”文件夹下“code.txt”文件中的所有代码复制到该事件过程中。调试程序正确，并保存窗体文件 test.frm和工程文件 test.vbp。