《浙江省永嘉县碧莲中学2018-2019学年高二信息技术上学期期中试题.docx》由会员分享，可在线阅读，更多相关《浙江省永嘉县碧莲中学2018-2019学年高二信息技术上学期期中试题.docx（5页珍藏版）》请在三一文库上搜索。
1、浙江省永嘉县碧莲中学2019-2019 学年高二信息技术上学期期中试题温馨提示： 所有试题答案都要答在答题卡上，答在试卷上的答案无效，总分 50 分！一、单项选择题（每题3 分，共 30 分）1计算表达式Val(10) + Len(2.3)的值是（）A.12.3B.102.3C. 102D.132. 下列选项中，可以作为 VB变量名的是（）A9xBx_9C9_xDfunction3.在 Visual Basic中，语句 TName.Caption = 2019伦敦 中的 TName是A 对象名B属性名C 属性值D事件名4 下列 Visual Basic表达式的值等于56 的是A Mid(123
2、4567,5,3) B Len(55) + 1 C Sqr(56) D Abs(-55) + 15.以下程序段是实现x*y （x、 y 均为自然数）运算的程序段，则划线处的语句应该是（）x=Val(Text1.Text)y=Val(Text2.Text)s = 0:j = 1Do While j a(i) thent=a(j):a(j)=a(i):a(i)=tend ifnext jnext i数组元素a(1) 到 a(5) 的值一次为： 33 24 45 16 77经过该程序段加工后，数组元素a(1) 到 a(5) 的值依次为：A. 77 33 45 1624B. 77 45 33 16 2
3、4C. 77 2445 1633D. 77 45 33 24 169 Private Sub Command1_Click()n = 100: Sum = 0: k = 1Do while k=nj=1Do while j=ksum=sum+1:j=j+1Loopk=k*2LoopEnd sub该字段运行后，变量sum 的值是A.256B. 255C.128D. 12710. 有如下 VB 程序段：Dim p As Integer, q As Integer, s As Integer, t As Integerp = Val(Text1.Text) :t=0For q = p+ 1 To 2
4、 * ps = (p * q) Mod (q - p)If s = 0 Thent = t+ 1End IfNext q第 - 2 -页Label1.Caption = Str(t)该程序段运行时，在文本框Textl中输入 8 ,则在标签Labell中显示的内容是（）A. 3B. 4C. 5D. 6二、非选择题（11 题每空 2 分， 12 题 6分，共 20 分）11.n 个数据元素存放到数组a（ n）中，对这n 个数据进行降序排序算法程序段如下：For i=1 to n-1For j=n to _ _step -1If_ _thent=a(j): _ _: a(j-1)=tend ifne
5、xt jnext in 个数据元素存放到数组a（ n）中，对这n 个数据进行升序排序算法程序段如下：For i=1 to n-1k=_For j=_ to nIf_then k=jNext jIf _ _thent=a(i): a(i)=a(k): a(k)=tend ifnext i12. 有如下程序段：Dim a(1 to 5) as integer ,s as stringa(1)=77:a(2)=73:a(3)=87: a(4)=80:a(5)=66i=1 : n=5Do while i=3第 - 3 -页j=1Do while ja(j+1) thena(j)=a(j)+a(j+1):a(j+1)=a(j)-a(j+1):a(j)=a(j)-a(j+1)End ifj=j+1LoopS=s+str(a(i)i=i+1LoopText1.Text=sEnd sub该程序运行后，文本框中显示的是_高二信息技术选择题答案第 - 4 -页