资源简介

____________________________________________________________________________________________
书生高级中学校 　 第三次月考高二信息试卷
　　　 （满分：50分 　考试时间：45 分钟） 2020.12
一、选择题（本大题共12小题，每小题2分，共24分。在每小题给出的四个选项中，只有一个符合题目要求）
1.下列有关信息和信息编码的说法，正确的是（ ）
A.虚假的美容广告，说明信息具有真伪性
B.汉字在计算机内部按照GB2312标准进行编码、存储和表示
C.信息一定采用二进制进行编码
D.语言、文字、图像和微信等都是信息的常用表达方式
2.下列关于网页和网络协议的说法，正确的是（ ）
A.SMTP协议用于接收E-Mail
B.将网页添加到收藏夹时名称可以重命名
C.IE 浏览器可浏览和直接编辑网页文件
D.在IE浏览器中清空历史纪录时需要使用HTTP协议
3.下列应用中，均体现了人工智能技术的是（ ）
①某手机依设定的时间自动开启夜览模式 ②通过扫描某商品的二维码获得价格
③用指纹锁功能打开手机 ④某主题餐馆使用机器人代替人工送餐
⑤使用手机拍照功能获取图像
A.①②　　　 B.②③　　　 C.③④　　　 D.④⑤
4.利用软件UltraEdit观察字符内码，界面如第4题图所示，下列说法正确的是（ ）
A.上述字符共需要12B的存储空间
B.字符“Z”的内码用十六进制表示为“60”
C.字符“庆70”的内码用十六进制表示为“C7 EC 37 30”
D.字符“！”的内码是“A1”
5.用 Access 软件设计“图书”数据表，在数据表中已录入如第 5 题图 a 所示的原始数据，
其设计视图如第 5 题图 b 所示。
第 5 题图 a 第 5 题图 b
下列描述正确的是（ ）
A.Access 软件属于数据库应用系统
B.可以增加数据类型为自动编号的“序号”字段
C.设计视图中字段顺序必须要和原始数据的列顺序保持一致
D.向数据表中添加新的记录时，“图书编号”字段的有效输入值可以为“20182002”
6.将下列数转换为十进制数，除以 4 后余数为 3 的是 （ ）
A.A90H B.100110B C.FFFH D.101101B
7.有一段未压缩的有声视频，时长3分钟，帧频25fps，16位增强色，分辨率是1024*768，视频中的音频比特率为1441 kbps，则该视频的存储容量约是 （ ）
A.0.8G B. 1.6G C. 3.3G D.6.6G
8.下列VB表达式计算结果为True的是
A.Int(Sqr(10)) > 2 ^ 2 B.Mid("0123", 3, 2) > "56"
C.Len("654321") > Int(Rnd * 3) ^ 2 D.Not (3 = 4 Or 5 > 3)
9.某算法的部分流程图如第9题图所示：
执行完该流程，数组a各元素的值可能为（ ）
A.8，14，9，6，2，12 B.2，4，10，22，10，10
C.8，12，0，11，2，10 D.6，12，0，10，4，8
10. 有如下 VB 程序段：
t = "abcd123456" : x = Int(Sqr(Len(t))) : y=1
If x > 3 Then
y =2
ElseIf x > 2 Then
y=3
ElseIf x > 1 Then
y=4
End If
执行该程序段后，变量 y 的值为
A.4 B.3 C.2 D.1
11.下列VB程序段实现把文本框Text 和Text2中输入的升序字符串合并成一个升序字符串，并在文本框 Tex3 中显示。
s1=Text1.Text:s2=Text2.Text
n=Len(s1):i=1:j= 1
Do While iIf Mid(s1,i,1)①
Else
s1= Mid(s1,1,i-1)+Mid(s2,j,1)+ Mid(s1,i,n+j-i)
②
End If
Loop
If ③ Then s1=s1+Mid(s2,j,len(s2)-j+1)
Text2.Text=s1
横线①②③处的代码为（ ）
A.j=j+1 i=i+1 j<=len(s1) B.i=i+1 j=j+1 j<=len(s1)
C.j=j+1 i=i+1 j<=len(s2) D.i=i+1 j=j+1 j<=len(s2)
12.有如下 VB 程序段：
s = Text1.Text
If Mid(s, 1, 1) = "(" Then flag = True Else flag = False
cnt = 0: sum = 0
For i = 2 To Len(s)
c = Mid(s, i, 1)
If flag = True Then
If c >= "a" And c <= "z" Then
sum = sum + 1
Else
If sum <> 0 Then cnt = cnt + 1: sum = 0
End If
End If
If c = "(" Then flag = True
If c = ")" Then flag = False
Next i
文本框 Text1 的内容为一串只包含小写字母、左右括号和空格的字符串“(we can) do
(better) we (should (be )better)”，执行程序段后，变量 cnt 的值为（ ）
A.3 B.4 C.5 D.6
二、非选择题（本大题共4小题，其中第13题8分，第14题6分，第15题6分，第16小题7分，共26分。）
13.小明收集了“电子商务创新活力城十强榜单”数据，并使用Excel软件进行数据处理,如图a所示。
图a
请回答下列问题：
（1）如图a所示，区域A3:A12的数据是通过排名函数Rank计算得到的：在A3单元格中输入公式 ，再利用自动填充功能完成区域A4：A12的计算。
（2）已知I3单元格中的内容是由公式“=SUM(C3:H3)”计算得到，若将C3:H3单元格的数值小数位数设置为0，则I3单元格中显示的值 。（单选，填字母：A．变大/ B．不变/ C．变小）
（3）根据图a中数据，制作一张“综合指数对比”图表，如图b所示。该图表的数据区域是________________。
（4）对数据区域A2:I12进行筛选操作，“电子商务交易指数”和“网上市场指引力指数”的筛选设置均如图c所示，则筛选出的城市是________________ （填城市名称）。

（5）小明从书籍上拍照获取“电子商务”相关内容后，在使用OCR软件进行字符识别，下列说法正确的是 （单选题）
A.该文字识别技术属于联机手写体汉字识别
B.文件“电子商务.tif”可能是识别的结果文件
C.通过“倾斜校正”操作有助于提高识别率
D.使用“识别”命令进行字符识别前应先进行文稿的校对
（6）将Excel制作的图表应用到Word软件，编辑文档界面如图所示
下列说法正确的是 （多选题，全部选对的得2分，选对但不全的得1分，不选或有选错的得0分）
A.有两个用户“wz1”和“wz2”各添加了一条批注
B.可以用替换方法将文中的“电子商务”全部更改为“E-Commerce”
C.删除文中的批注对象“电子交易”，相关的批注内容也会消失
D.拒绝所有修订后，倒数第二行变为“电子商务通常是指在全世界全球各地广泛的商业贸”
E.文章中图片环绕方式为“嵌入型”
14.编写 VB 程序采用逢二进一的方法模拟“写二进制数”过程。程序功能如下：
在文本框 Text1 中输入一个不大于 100 的数字 n，点击“写二进制数”按钮，在列
表框 List1 中逐一显示 1 到 n 之间所有的二进制数。
第 14 题图
（1）在设计程序界面时，可用题 15 图中所示“控件工具箱”中的_____________ （填
写相应编号）添加用于显示二进制值的列表框。（1 分）
（2）实现上诉功能的 VB 程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim d(1 To 7) As Integer ’数组 d 用于存储二进制数值的每一位的值
n = Val(Text1.Text)
For i = 1 To 7
d(i) = 0
Next i
For i = 1 To n
‘最低位加 1 后，“逢二进一”处理进位，从而产生下一个二进制数
①________________
d(k) = d(k) + 1
s = ""
For k = 1 To 6
If d(k) = 2 Then
d(k + 1) = d(k + 1) + 1
②______________
End If
③________________
Next k
List1.AddItem Str(i) + " " + str(d(k)) + s
Next i
End Sub
已知数组 a 中的元素按非递减有序排列，在程序运行时显示在 Text1 中。编写程序实现如下 功能：删除数组的重复元素，并更新数组的长度，在 Text2 输出新的数组元素值。程序运行界面如图所示。

（1）要是程序运行时，窗体 Form1 标题立即立即显示为“删除重复数组元素”，可在______（单 选：A.Form_Load()/B.Form_click()/C.Command1_Click()）事件过程中添Form1.Caption=”
删除重复数组元素”语句来实现。
（2）为实现上述功能的 VB 程序如下，请在划线处补充缺失的代码。
Const n = 20
Dim a(1 To n) As Integer
Dim lena As Integer
'数组 a 的实际长度
Dim s As String
Private Sub Form_Load()
'生成 lena 个长度的非递减序列，并输出到文本框 text1 中，代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer
i = 1
Do While i < lena
If a(i) <> a(i + 1) Then
i = ①________________
Else
For j = i + 1 To lena
a(j - 1) = ②_________________
Next j
③_________________
End If
Loop
s = ""
For i = 1 To lena
s = s + Str(a(i))
Next i
Text2.Text = s
End Sub
16.填写n阶（n为奇数）幻方的口诀：?
1?居上行正中央，依次斜填切莫忘，上出框界往下写，右出框时左边放，重复便在下格填，出角重复一个样。
（1）1?居上行正中央——数字?1?放在首行最中间的格子中；?
（2）依次斜填切莫忘——向右上角斜行，依次填入数字；?
（3）上出框界往下写——如果右上方向出了上边界，就以出框后的虚拟方格位置为基准，将数字竖直降落至底行对应的格子中；?
（4）右出框时左边放——同上，向右出了边界，就以出框后的虚拟方格位置为基准，将数字平移至最左列对应的格子中；
（5）重复便在下格填——如果数字｛N｝?右上的格子已被其它数字占领，就将｛N＋1｝?填写在｛N｝下面的格子中；
（6）出角重复一个样——如果朝右上角出界，和“重复”的情况做同样处理
Dim a(1 To 1000) As Integer
Dim k As Integer, i As Integer, s As String
Dim n As Integer, j As Integer
Function geshi(s1 As String, x As Integer) As String
‘此函数用于输出时补足空格对齐
Do While Len(s1) < x
s1 = " " + s1
Loop
geshi = s1
End Function
Private Sub Command1_Click() '生成幻方
List1.Clear: Text1.Enabled = False: Command1.Enabled = False
Command2.Enabled = True: Command4.Enabled = True
n = Val(Text1.Text)
k =_①_________________
a(k) = 1
num = 2
Do While num <= n * n
If k < n Then '当前位置是第1行，但不是最右边列
k = k + (n - 1) * n + 1
ElseIf k = n Then '当前位置是第1行最右边列
k = k + n
ElseIf ②_________________ Then '非第1行的最右边列时
k = k - 2 * n + 1
Else '一般情况
k = k - n + 1
End If
If a(k) <> 0 Then k = k + 2 * n - 1 '新位置处已有数字时
a(k) = ③____________________
num = num + 1
Loop
s = ""
For i = 1 To n * n
s = s + geshi(Str(a(i)), 5) '每项输出宽度为5个字符的位置
If i Mod n = 0 Then
List1.AddItem s
s = ""
End If
Next i
List1.AddItem "--------------------------------"
End Sub
高二第三次月考答案
一、选择题（2*12=24分）
1 2 3 4 5 6 7 8 9 10 11 12
A B C C B C D C D B D C
非选择题（26分,第13题8分，第14题6分，第15题6分，第16题6分）
13.（1）=RANK(I3,I$3:I$12,0) （1分） （2）B （1分）
（3）B2:B6，I2:I6 （1分） （4）北京、上海（2分）
（5）C （1分） （6）BC （2分）
14.（1）_________4____________（1 分）
（2） ①_______k=1___________（1 分） ②_______d(k)=0_________（2 分）
③___s=str(d(k))+s_或s=d(k) & s___（2 分）
15.（1）_________A____________（1 分）
（2） ①_______i=i+1___________（1 分） ②_______a(j)_________（2 分）
③______lena=_lena-1____（2 分）
16.①_______n\2+1或(n+1)\2或其他等价答案_____（2 分） ②____k mod n = 0___（2 分）
③______a(k)=num____（2 分）

展开更多......

收起↑