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

上传人:得****3 文档编号:75944991 上传时间:2023-03-06 格式:PDF 页数:3 大小:97.62KB
返回 下载 相关 举报
2011年浙江省信息技术会考算法与程序设计7801.pdf_第1页
第1页 / 共3页
2011年浙江省信息技术会考算法与程序设计7801.pdf_第2页
第2页 / 共3页
点击查看更多>>
资源描述

《2011年浙江省信息技术会考算法与程序设计7801.pdf》由会员分享,可在线阅读,更多相关《2011年浙江省信息技术会考算法与程序设计7801.pdf(3页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

1、2011 年浙江省信息技术会考试题 第 7 套 选择题(算法)8、下列表达式中,符合 Visual Basic 表达式书写规范的是 (A)3+|k-1|(B)2k-1 (C)a k/2 (D)k2-1 9、在Visual Basic 中,若需将350 位学生的借阅卡号(如“H001036”)分别存储在数组code 的 code(1)code(350)元素中,则下列说明语句最合适的是 (A)Dim code(1 To 350)As Integer(B)Dim code(1 To 350)As Single(C)Dim code(1 To 350)As String(D)Dim code(1 To

2、 350)As Boolean 10、下列Visual Basic 表达式的值等于2 的是 (A)Abs(-2.1)(B)Int(2.1)(C)Sqr(4.2)(D)Len(4)11、某Visual Basic 程序的一个事件过程如下:Private Sub Form_Load()Command1.Caption=计算 End Sub 在程序运行时,能触发该事件的是 (A)窗体装载(B)单击窗体(C)单击命令按钮Command1(D)双击窗体 12、在Visual Basic 代码编辑窗口中,输入了“Command1.”后出现了如图所示的信息:其中的“Caption”是Command1 的 (

3、A)事件名 (B)属性名 (C)对象名 (D)方法 13、7 位学生的身高(单位:cm)从高到低依次为:178,177,175,172,170,165,162。用对分查找法找到178 所需要的查找次数是 (A)1 (B)2 (C)3 (D)4 14、下列Visual Basic 程序段运行后,变量s 的值等于55 的是 s=0:i=1 Do While i=10 s=s+i i=i+1 Loop s=0:i=1 Do While i=10 i=i+1 s=s+i Loop s=0 For i=1 To 10 s=i Next i s=0 For i=1 To 10 i=i+s Next i (

4、A)(B)(C)(D)填空部分 1、有如下Visual Basic 程序段:a=Function b=Cap c=b+Mid(a,5,4)该程序段运行后,变量c 的值为_。2、有如下Visual Basic 程序段:s=0 For i=1 To 5 s=s+i*2 Next i Label1.Caption=Str(s)该程序段运行后,在标签Label1 上显示的是_。3、张强编写了一个Visual Basic 程序,用于查找所有相同身高的同学编号。程序运行界面如图所示,在列表框List1 中显示所有同学的编号和身高(按身高从低到高排列),在文本框 Text1 中输入需要查找的身高,单击“查找

5、”按钮Command1,在列表框List2 中显示所有此身高的同学编号。数组a 和数组b 分别存储同学的编号和对应的身高(身高已从低到高排列)。解决此问题的程序代码如下:Const n As Integer=10 n 为学生数 Dim a(1 To n)As String 数组a 用于存储学生的编号 Dim b(1 To n)As Integer 数组b 用于存储学生的身高 Private Sub Command1_Click()此过程用于在列表框List2 中显示给定身高的所有学生的编号,代码略。End Sub 以下函数用于查找给定身高的学生的相关信息 Private Function Fi

6、ndEx(k As Integer)As Integer Dim f As Boolean,i As Integer,j As Integer,m As Integer i=1:j=n f=False Do While(i=j)And Not(f)m=Fix(i+j)/2)If k=b(m)Then f=Else If k b(m)Then j=m-1 Else End If End If Loop If f Then FindEx=m Else FindEx=0 找到返回m,否则返回0 End Function Private Sub Form_Load()此过程用于对数组a 和数组b 进行

7、赋值,并把数据显示在列表框List1 中。代码略 End Sub (1)FindEx 函数主要采用的算法是_。(填:顺序查找/对分查找)(2)在程序和划线处,填入适当的语句或表达式,把程序补充完整:程序中划线处应填入_。程序中划线处应填入_。操作题 打开考生文件夹下“VB”文件夹中的“test.vbp”,该VB 程序的功能是:运行程序,出现“奔跑”画面;单击“加速”按钮Command1,奔跑速度加快;单击“停止”按钮Command2,奔跑停止;单击“结束”按钮Command3,退出程序。程序运行界面如下图。完成以下操作:(1)将命令按钮Command2 的 Caption 属性值设置为“停止”;(2)为“加速”按钮Command1 添加Click 事件过程,并将“VB”文件夹下“code.txt”文件中的所有代码复制到该事件过程中。调试程序正确,并保存窗体文件test.frm 和工程文件test.vbp。

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 应用文书 > 工作报告

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号© 2020-2023 www.taowenge.com 淘文阁