- 1、本文档共7页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
20100524镇海中学2010年《算法与程序设计》模块考试(改动)
镇海中学2010年高一《算法与程序设计》模块考试试卷
考试时间:45分钟,总分:100分,考试形式:笔试
注意:所有试题答案必须写在答题纸上,写在试卷上无效
一、选择题(本题有20小题,每小题3分,共60分,选出各题中一个符合题意的正确选项,不选、多选、错选均不给分)
1. 在Visual Basic程序设计环境里,语句school.Text=宁波市镇海中学中的school是______
(A)标签对象名 (B)文本框对象名 (C)窗体对象名 (D)命令按纽对象名
2. 下列VB语句中,将数组变量k的元素定义成字符串型变量的是___________
(A)Dim k(-5 To 3) As Boolean (B) Dim k(-5 To 3) As Single
(C)Dim k(-5 To 3) As String (D)Dim k(-5 To 3) As Integer
3. 设a=10,b=20,c=30,d=40, 则逻辑表达式: ab And c=d Or ad 的值是_________
(A) True (B)False (C)Flase (D)Ture
4. 在Visiual Basic中, 常量还可以自己定义,为了自定义一个常量m=3.14159,下列语句中正确的是________
(A)Dim m=3.14159 (B)Dim m As 3.14159
(C)Const m=3.14159 (D)Const m As 3.14159
5. 在Visual Basic中,下列不属于赋值语句的是__________
(A)m=n+5 (B)m(3)=n+5 (C)m+5=n (D)school.Caption=镇海中学
6. 在Visual Basic中,若xy=Len(Mid(x,2,3)),则变量y的值为_________
(A)2 (B)234 (C)5 (D)3
7. 若以下是一个完整的Visual Basic程序段,问什么时候会运行此程序段_________
Private Text1_DblClick()
For i=1 To 100
sum=sum+i
Next i
End Sub
(A)Text1对象上单击鼠标
(B)Text1对象上双击鼠标
(C)任何地方单击鼠标
(D)窗体对象Form1上双击鼠标
8. 移动电话通话时间是以秒数为单位记录的,话费查询系统将通话时间的秒数值sum转换为m分s秒格式后反馈给查询者,转换的流程图如下所示:为了正确完成转换,则空白矩形框中应该填入的是___________
(A)s←s-60 (B)s←s+60 (C)s←s+1 (D)s←s+sum
9. 交通违规记录查询系统中,在文本框Text1中输入车辆的“车牌号码”后,点击“查找”按纽,可查询该车辆的所有违规记录。若变量x 表示待查的“车牌号码”,则将文本框Text1内输入的内容送给变量x 的最合适的VB语句是_________
(A)x=Text (B)x=Val(Text1) (C)x= Text1.Text (D)x=Val(Text1.Text)
10. 如下Visual Basic程序段:
x=10
y=20
z=Str(x)+Str(y)
此程序段运行后,变量z的值________
(A)30 (B)”30” (C)1020 (D)”10 20”
11.冒泡排序的基本思想是从最后一个数开始,相邻二数之间不断进行比较与交换来实现排序的,有一组数,顺序是“8、1、4、2”,用冒泡排序法将这组数从小到大排序,第2遍加工后的数据的顺序是_______
(A) 1、2、4、8 (B) 1、2、8、4 (C) 1、8、4、2 (D) 1、4、8、2
12. 以下VB程序段采用的排序算法属于_________
Dim data(1 to 10) As Integer
For i=1 To 9
k=i
For j=i+1 To 10
If data(j)data(k) Then k=j
Next j
If ki Then
x=data(k)
文档评论(0)