浙江省绍兴市上虞区2020-2021学年高二下学期信息技术期末教学质量试卷-组卷题库站

选择题（本大题共12小题，每小题2分，共24分）

学号	姓名	班级	日期	体温	是否住宿
20200510	陈怡	高一(5)班	2021.6.30	36℃	是
20180101	沈佳森	高三(1)班	2021.6.31	36.3℃	否
20190302	张国浩	高二(3)班	2021.6.32	36.1℃	是
…	…	…	…	…	…

下列关于“体温记录”数据表的描述，正确的是（）

A、该数据表的字段数可能多于6个

B、该校园体温记录系统是数据库管理系统

C、该数据表中必定有一个字段的字段名为“学号”

D、图中“是否住宿”列在该数据表中相应字段的数据类型一定是“文本”

下列关于计算机信息编码的描述，正确的是（）

A、数据的压缩是一个解码的过程

B、每个汉字的输入码和处理码都是唯一的

C、字符“9”的内码为39H，则字符“10”的内码为3AH

D、在某十六进制数的末位添加一个0，其值将是原数的16倍

用Photoshop软件制作“勇攀高峰”作品，在“生命不息运动不止”图层输入文字“生命不息运动不止”，相关编辑界面如题图所示。

下列描述正确的是（）

A、存储每个像素点所需的二进制位数为24位

B、无法将“底纹”图层移动到“多圆”图层上方

C、可以将“登顶”图层的图层样式直接拷贝到“底纹”图层

D、当前状态下，不可以使用文字工具单独调整“生命不息运动不止”图层中“生命”的大小

一个时长为1分钟、采样频率为44.1KHz、量化位数为16bit的立体声WAV格式音频文件，压缩为MP3格式的文件大小约为1MB，则其压缩比约为（）

D、 Sqr(Abs(-9))+Val("3")

某算法的部分流程图如图所示。执行这部分流程后，s的值应为（）

s = "Happy 2021/07"

ans = "": f = True: Max = ""

For i = 1 To Len(s)

ch = Mid(s, i, 1)

If ch >= "a" And ch <= "z" Then

ans = ans + Chr(Asc(ch) - 32)

ElseIf ch >= "0" And ch <= "9" Then

f = False

End If

If Not f And ch > Max Then

Max = ch: f = True

End If

Next i

Label1.Caption = ans + Max

执行该段程序后，标签label1中显示的内容是（）

Dim a(1 To 6) As Integer

a(1) = 6

For i = 2 To 6

a(i) = Int(Rnd * 30 + 1) * 3

If a(i) Mod 2 = 1 And i Mod 2 = 0 Then

i = i - 1

ElseIf a(i) > 60 Then

a(i) = a(i) - a(i - 1)

End If

Next i

执行该段程序后，a(1)~a(6)中的值可能是（）

Dim a(1 To 8) As Integer

K = 8: n = 8

For i = 1 To 3

For j = i + 1 To n

If a(i) < a(j) Then

t = a(i): a(i) = a(j): a(j) = t

End If

Next j

For j = n - i To i + 1 Step -1

If a(k) > a(j) Then

t = a(k): a(k) = a(j): a(j) = t

End If

Next j

k = k - 1

Next i

数组元素a(1)~a(8)中的初始值为：8,13,7,14,6,9,5,12,执行该程序段后，数组元素a(1)~a(8)中的值将变为（）

A、 14,13,12,8,9,7,6,5

B、 5,6,7,9,8,12,13,14

C、 5,6,7,8,9,12,13,14

D、 14,13,12,9,8,7,6,5

有如下程序段：

Dim a(1 To 8) As Integer

key = Val(Text1.Text)

i = 1: j = 8

Do While i < j

m = ①

If key > a(m) Then

②

Else

③

End If

Loop

Text2.Text = Str(j)

已知数组a存储一组升序数“2,3,5,9,10,15,18,25”,要查找第一个不小于key的元素下标并输出在Text2中，则下列选项中正确的是（）

A、 ①（i+j+1）\2 ②i=m ③j=m-1

B、 ①（i+j+1）\2 ②i=m+1 ③j=m

C、 ①（i+j）\2 ②i=m ③j=m+1

D、 ①（i+j）\2 ②i=m+1 ③j=m

非选择题（本大题共4小题，4+8+7+6，共26分。）

陈老师收集了高三学生某次模拟考试的统计数据，并使用EXCEL软件进行数据处理，如图a所示。

图a

请回答下列问题：

用Flash软件打开“中国传统文化.fla”文件，编辑界面如图a所示。

请回答下列问题：

图a

小明设计了一个算法，来实现10个11-99之间随机数字的升序排序，并去掉重复数字。程序设计思想如下：a(1)~a(10) 用于存放原数据，b(1)~b(num)用于存放排序完成后的结果，对于每个待排数字a(i)，先在b数组中查询是否存在，如不存在，则放入到b数组中。程序运行界面如下图所示。

VB代码实现如下：

Const n = 10

Dim a(1 To 100) As Integer

Dim b(1 To 100) As Integer

Private Sub Form_Load()

‘随机生产10个11-99之间的数字，并依次存储在数组a中，代码略

End Sub

Private Sub Command1_Click()

Dim num As Integer, L As Integer, R As Integer, i As Integer

Dim m As Integer, f As Boolean

num = 1: b(1) = a(1)

For i = 2 To n

b(num + 1) = a(i) + 1

f = False

For j = 1 To num + 1

If a(i) < b(j) Then

Exit For

ElseIf a(i) = b(j) Then

①

End If

Next j

If Not f Then

For k =

b(k + 1) = b(k)

Next k

②

num = num + 1

End If

Next i

‘最终将数组b的排序结果输出到文本框中，代码略

End Sub

根据如上代码，请回答下列问题：

小王计划使用VB制作一个扫雷小游戏，他首先需要生成一个“雷区”：

①生成n*n的矩阵，其中计划埋雷m个，n和m的数据分别从text1和text2中获取（n<=10，m<=n）

②随机位置埋好地雷后（埋雷位置用X表示且埋雷位置不重复），未埋雷的位置显示该位置周围一圈地雷的数量。

程序代码如下：

Dim flag(0 To 200) As Boolean, a(0 To 200) As String

Dim n As Integer, m As Integer

Private Sub Command1_Click( )

Dim s As String, x As Integer, k As Integer

Dim i As Integer, j As Integer

Randomize

n = Val(Text1.Text): m = Val(Text2.Text)

‘初始化数组flag中各元素均为False，数组a中各元素值为字符"0"，代码略

For i = 1 To m

x = Int(Rnd * (n ^ 2)) + 1

If flag(x) = True Then i = i - 1 Else flag(x) = True

Next i

For k = 1 To n * n

If flag(k) = True Then

a(k) = "X"

Else

For i = (k - 1) \ n To (k - 1) \ n + 2

For j = ①

If i = 0 Then Exit For

If flag((i - 1) * n + j) = True And j >= 1 And j <= n Then

a(k) = ②

End If

Next j

Next i

End If

Next k

For i = 1 To n * n ‘在列表框list1中输出矩阵

s = s + " " + a(i)

If ③ Then

List1.AddItem s

s = ""

End If

Next i

End Sub

根据上述代码，完成下列问题：

浙江省绍兴市上虞区2020-2021学年高二下学期信息技术期末教学质量试题