浙江省金华市曙光中学2018_2019学年高二信息技术上学期期中试题(选择题有答案)

资源下载
  1. 二一教育资源

浙江省金华市曙光中学2018_2019学年高二信息技术上学期期中试题(选择题有答案)

资源简介

浙江省金华市曙光中学2018-2019学年高二信息技术上学期期中试题
温馨提示:所有试题答案都要答在答题卡上,答在试卷上的答案无效,总分50分!
一、单项选择题(每题3分,共30分)
1.计算表达式Val("10") + Len("2.3")的值是( )
A.12.3 B.102.3 C. 102 D.13
2. 下列选项中,可以作为VB变量名的是()
A.9x B.x_9 C.9_x D.fun_ction
3. 在Visual Basic中,语句TName.Caption = "2012伦敦"中的TName是
A. 对象名 B.属性名 C.属性值 D.事件名
4.下列Visual Basic表达式的值等于56的是
A.Mid("1234567",5,3) B.Len("55") + 1 C.Sqr(56) D.Abs(-55) + 1
5.以下程序段是实现x*y(x、y均为自然数)运算的程序段,则划线处的语句应该是( )
x=Val(Text1.Text)
y=Val(Text2.Text)
s = 0:j = 1
Do While j <= y

j = j + 1
Loop
Text3.Text=Str(s)
A.s=s *j B.s=s+x C.s=x*j D.s =s*x
6. 使用选择排序的方法对数据8、6、1、9、4 从大到小排序,需要进行数据比较、数据互换的次数分别是( )
A、4,5 B、10,2 C、3,3 D、10,4
7. 有一个数组,采用冒泡排序,第一遍排序后的结果为:4,10,5,32,6,7,9,17,24那么该数组的原始顺序不可能的是
A.10,5,32,6,7,9,17,24,4 B. 10,5,32,6,7,9,4,17,24
C.10,5,32,4,6,7,9,17,24 D. 4,10,5,32,17,9,24,6,7
8. for i=1to 2
For j=5 to i+1 step -1
If a(j)>a(i) then
t=a(j):a(j)=a(i):a(i)=t
end if
next j
next i
数组元素a(1)到a(5)的值一次为:33 24 45 16 77 经过该程序段加工后,数组元素a(1)到a(5)的值依次为:
A. 77 33 45 16 24 B. 77 45 33 16 24
C. 77 24 45 16 33 D. 77 45 33 24 16
9.Private Sub Command1_Click()
n = 100: Sum = 0: k = 1
Do while k<=n
j=1
Do while j<=k
sum=sum+1:j=j+1
Loop
k=k*2
Loop
End sub
该字段运行后,变量sum的值是
A.256 B. 255 C.128 D. 127
10.有如下 VB 程序段:
Dim p As Integer, q As Integer, s As Integer, t As Integer
p = Val(Text1.Text) :t=0
For q = p+ 1 To 2 * p
s = (p * q) Mod (q - p)
If s = 0 Then
t = t+ 1
End If
Next q
Label1.Caption = Str(t)
该程序段运行时,在文本框Textl中输入8 , 则在标签Labell中显示的内容是()
A. 3 B. 4 C. 5 D. 6
二、非选择题(11题每空2分,12题 6 分,共20分)
11.n个数据元素存放到数组a(n)中,对这n个数据进行降序排序算法程序段如下:
For i=1 to n-1
For j=n to __①_____step -1
If________②___then
t=a(j): _③_______: a(j-1)=t
end if
next j
next i
n个数据元素存放到数组a(n)中,对这n个数据进行升序排序算法程序段如下:
For i=1 to n-1
k=_____④
For j=___⑤_____ to n
If____⑥______then k=j
Next j
If ___⑦____then
t=a(i): a(i)=a(k): a(k)=t
end if
next i
12.有如下程序段:
Dim a(1 to 5) as integer ,s as string
a(1)=77:a(2)=73:a(3)=87: a(4)=80:a(5)=66
i=1 : n=5
Do while i<=3
j=1
Do while j<=n-i
If a(j)>a(j+1) then
a(j)=a(j)+a(j+1):a(j+1)=a(j)-a(j+1):a(j)=a(j)-a(j+1)
End if
j=j+1
Loop
S=s+str(a(i))
i=i+1
Loop
Text1.Text=s
End sub
该程序运行后,文本框中显示的是__________________
高二信息技术选择题答案
1-10 DBADB DDBDB

展开更多......

收起↑

资源预览