1.选择题- (共12题)
1.
下列关于信息的相关说法不正确的是( )
A.扫描人脸得到识别数据并建立数据库,这一过程主要涉及信息的获取 |
B.在抖音中发布的短视频就是信息 |
C.在公共场所应慎用免费的 WIFI 进行上网 |
D.车载导航应定期更新,反映了信息的时效性 |
2.
使用 GoldWave 软件编辑“音乐.wav”音频文件,选择其中一段音频后的部分界面如图所示。下列说法正确的是()


A.执行“静音”操作后,该音频的存储容量变小 |
B.执行“删除”操作后,被选中的部分音频将变成“静音” |
C.执行“剪裁”操作后,该音频的存储容量不变 |
D.将该文件重命名为“音乐.mp3”操作后,该音频的存储容量变小 |
3.
某个 Access 数据表“球员信息”的“设计视图”和“数据表视图”分别如图 a 和图 b 所示:
如果在该数据表中插入“新记录”,并输入相应的数据,下列可能作为新记录的是( )

如果在该数据表中插入“新记录”,并输入相应的数据,下列可能作为新记录的是( )
A.2 丁彦雨航 19930306 后卫 26 号 |
B.9 李根 1988/8/15 前锋 17 |
C.7 韩德君 1989/5/14 前锋 16 |
D.12 易建联 1987\10\27 中锋 11 |
4.
下列应用中,体现了人工智能技术的有( )
①华为手机指纹解锁 ②用淘宝 APP 识别图片,系统显示与图片相类似的产品
③使用微信进行语音聊天④手写输入法⑤使用校园一卡通进行支付
①华为手机指纹解锁 ②用淘宝 APP 识别图片,系统显示与图片相类似的产品
③使用微信进行语音聊天④手写输入法⑤使用校园一卡通进行支付
A.①②④ | B.②④⑤ | C.①②③ | D.③④⑤ |
5.
原码、反码、补码是计算机中对数字的二进制表示方法。(1)原码就是二进制定点表示法,即最高位为符号位,“0”表示正,“1”表示负,其余位表示数值的大小。(2)反码表示法规定:正数的反码与其原码相同,负数的反码是对其原码逐位取反,但符号位除外。如二进制原码为 10010,则反码为 11101(在 10010 中,1 为符号码,故为负)。(3)补码表示法规定:正数的补码与其原码相同;负数的补码是在其反码的末位加 1,符号位除外。根据以上运算规则,二进制有符号数 100111 的补码的十进制表示是()
A.-29 | B.-25 | C.24 | D.-24 |
7.
下列关于网上信息的浏览与获取的说法正确的是( )
A.利用搜索引擎可以找到任何想要的东西 |
B.浏览网页是通过 FTP 协议解释执行的 |
C.“收藏夹”的作用是保存网页的网址,它本身是一个文件夹 |
D.保存网页类型为“网页,全部”,则图片被保存在对应的网页中 |
8.
某对分查找算法的 VB 程序段如下:
i= 1 : j= 8 : t= 0 key=Int(Rnd()*7)+14
Do While i<=j
m=Int((i+j)/2)
t=t+1
if a(m)=key Then Exit Do
else
If a(m)>key Then j=m-1
Else
Loop
数组元素 a(1)到 a(8)的值依次为“2,11,14,15,18,19,20,22”,该程序段运行结束后,变量 t 的最大值可能是()
i= 1 : j= 8 : t= 0 key=Int(Rnd()*7)+14
Do While i<=j
m=Int((i+j)/2)
t=t+1
if a(m)=key Then Exit Do
else
If a(m)>key Then j=m-1
Else
i=m+1 End if
End ifLoop
数组元素 a(1)到 a(8)的值依次为“2,11,14,15,18,19,20,22”,该程序段运行结束后,变量 t 的最大值可能是()
A.1 | B.2 | C.3 | D.4 |
9.
某对分查找算法的 VB 程序段如下:
i=1:j=8:s=""
key=Text1.Text
Do While i<=j
m=(i+j)\2
If key=a(m) Then
s=s+"M"
Exit Do
Elseif Key >a(m) Then
j=m-1:s=s+"L"
Else
i=m+1: s=s+"R" End if
Loop Text1.Text=s
数组元素 a(1)到 a(8)的值依次为“tiger,snake,sheep,rabbit,pig,mouse,monkey,dog”,若该程序段执行后,文本框 Text1 中显示的内容不可能是()
i=1:j=8:s=""
key=Text1.Text
Do While i<=j
m=(i+j)\2
If key=a(m) Then
s=s+"M"
Exit Do
Elseif Key >a(m) Then
j=m-1:s=s+"L"
Else
i=m+1: s=s+"R" End if
Loop Text1.Text=s
数组元素 a(1)到 a(8)的值依次为“tiger,snake,sheep,rabbit,pig,mouse,monkey,dog”,若该程序段执行后,文本框 Text1 中显示的内容不可能是()
A.RLM | B.LR | C.RM | D.LM |
10.
采用冒泡排序对一组数据进行排序,第一遍排序后的结果为2,19,4,55,6,7,11,13,32,那么该数组的原始顺序不可能是()
A.19,4,55,6,7,11,13,32,2 |
B.2,19,4,55,13,11,32,6,7 |
C.19,4,55,2,6,7,11,13,32 |
D.19,4,55,6,7,11,2,13,32 |
11.
小王拍摄了一段未压缩的无声视频,视频时长为 12 秒,分辨率为 720*520 像素,帧速率为 30 帧/秒,每帧位深度为 24 位,在传输速率为 50Mbps 的网络环境下,将该视频上传到某网站所需的时间大概为()
A.4 秒 | B.30 秒 | C.60 秒 | D.120 秒 |
12.
有如下VB程序段:
For i =" 1" To 6
a(i) =" Int(Rnd" * 10) + 1
Next i
For i =" 1" To 5
If i Mod 2 =" 1" And a(i) > a(i + 1) Then
t =" a(i)" : a(i) =" a(i" + 1) : a(i + 1) = t
Else
a(i) =" a(i)" + 1
End If
Next i
执行该程序段后,a(l)~a(6)各元素可能的值是
For i =" 1" To 6
a(i) =" Int(Rnd" * 10) + 1
Next i
For i =" 1" To 5
If i Mod 2 =" 1" And a(i) > a(i + 1) Then
t =" a(i)" : a(i) =" a(i" + 1) : a(i + 1) = t
Else
a(i) =" a(i)" + 1
End If
Next i
执行该程序段后,a(l)~a(6)各元素可能的值是
A.11,11,7,9,3,9 | B.6,2,8,10,5,9 |
C.6,9,3,7,8,12 | D.3,9,0,8,2,7 |
2.填空题- (共4题)
13.
下图是 2018 年对主要国家和地区货物进出口金额及增长速度的数据。请回答下列问题:
(1)在图 a 所示工作表中,区域 D3:D13 中的数据是通过公式计算得到的,选择 D3 单元格,输入公式,然后用自动填充功能完成其他单元格的计算。则 D3 单元格的公式是___。(提示:2018 年出口额比上年增长率=(2018 年出口额(亿元)-2017 年出口额(亿元))÷2017 年出口额(亿元)×100)
(2)如图 a 所示,C14 单元格的公式为“=sum(C3:C13)”(不包含双引号),将该单元格复制并粘贴至 F14 单元格,则 F14 单元格中的内容为____。(单选,填字母:
(3)为了反映 2018 年亚洲主要国家和地区货物进出口增长率的变化情况,制作了如上图 b 所示的图表。该图表的数据区域是__________________。
(4)货物进出口比上年增长率都排在前 3 位的国家和地区是_________________。

(1)在图 a 所示工作表中,区域 D3:D13 中的数据是通过公式计算得到的,选择 D3 单元格,输入公式,然后用自动填充功能完成其他单元格的计算。则 D3 单元格的公式是___。(提示:2018 年出口额比上年增长率=(2018 年出口额(亿元)-2017 年出口额(亿元))÷2017 年出口额(亿元)×100)
(2)如图 a 所示,C14 单元格的公式为“=sum(C3:C13)”(不包含双引号),将该单元格复制并粘贴至 F14 单元格,则 F14 单元格中的内容为____。(单选,填字母:
A.=sum(C3:C13) | B.=sum(F3:F13) | C.#NAME? | D.#DIV/0!) |

(3)为了反映 2018 年亚洲主要国家和地区货物进出口增长率的变化情况,制作了如上图 b 所示的图表。该图表的数据区域是__________________。
(4)货物进出口比上年增长率都排在前 3 位的国家和地区是_________________。
14.
小明使用多媒体软件创作名为《雪中送炭》的作品。请根据要求回答下列问题:
(1)如图 a 所示,以下操作可行的是_______(多选,填字母:A.选择“送炭人”图层,通过“复制图层”命令,可看到两个“送炭人”;/B.使用“图像大小”命令,可单独调整“送炭人” 图层中的人物大小/C.使用“自由变换”命令,可调整“雪中送炭”图层中的文字大小/

(2)如题图 b 所示,“文字”图层实现的是文字由透明到完全显示且逐渐放大的动画效果,则该图层的动画类型是_____(单选:A.逐帧动画 B.动画补间动画 C.形状补间动画)
(3)如图 b 所示,若要使动画的播放时间缩短为原来的 2/3,应将动画的帧频设置为_____。
(4)如图 b 所示,若想让“送炭人”图层中的人物在动画一开始就出现在舞台,并马上沿着城门前的路缓步走远,应进行的操作是_____。
(5)如图 b 所示,该场景播放到 60 帧时在舞台左下角出现“Play”按钮,单击该按钮时,动画跳转到“main”场景的第一帧并停止播放,同时动画的音乐也停止了播放,则“Play”按钮的动画脚本为_____。
(1)如图 a 所示,以下操作可行的是_______(多选,填字母:A.选择“送炭人”图层,通过“复制图层”命令,可看到两个“送炭人”;/B.使用“图像大小”命令,可单独调整“送炭人” 图层中的人物大小/C.使用“自由变换”命令,可调整“雪中送炭”图层中的文字大小/
A.将“雪中送炭”图层的图层样式拷贝至“送炭人”图层后,这两个图层的图层样式效果完全一致/ | B.调整“背景” 图层的“不透明度”,可使该图片的背景呈现半透明的效果。) |

(2)如题图 b 所示,“文字”图层实现的是文字由透明到完全显示且逐渐放大的动画效果,则该图层的动画类型是_____(单选:A.逐帧动画 B.动画补间动画 C.形状补间动画)
(3)如图 b 所示,若要使动画的播放时间缩短为原来的 2/3,应将动画的帧频设置为_____。
(4)如图 b 所示,若想让“送炭人”图层中的人物在动画一开始就出现在舞台,并马上沿着城门前的路缓步走远,应进行的操作是_____。
(5)如图 b 所示,该场景播放到 60 帧时在舞台左下角出现“Play”按钮,单击该按钮时,动画跳转到“main”场景的第一帧并停止播放,同时动画的音乐也停止了播放,则“Play”按钮的动画脚本为_____。

15.
某班师生玩一个游戏,n(n 不超过 1000)个同学站成一圈,逆时针编号为 l - n,有两个老师 A 和 B,A 老师从 1 开始逆时针数 k 个同学,B 老师从 n 开始顺时针数 m 个同学(注意 A,B 老师可能数到同一个学生),被老师选中的 1 个或 2 个学生离开圈子,剩下的学生继续。
程序开始时在 Text1 中输入同学数 n,在 Text2 中输入 k 的值,在 Text3 中输入 m 的值,点击“开始” 按钮,在 label5 中显示依次出圈的学生编号。程序运行如图所示:

VB 程序如下,请将按要求答题:
Dim stu(1 To 1000) As Integer
Dim n As Integer
Private Sub Command1_Click()
stup1 = n: stup2 = 1
For i = 1 To n
stu(i) = i Next i
Do While left > 0
stup1 = teachount(stup1, 1, k)
stup2 =
Label5.Caption = Label5.Caption & " " & Str(stup1)
left = left - 1
If ② Then
Label5.Caption = Label5.Caption & " " & Str(stup2)
left = left - 1
End If stu(stup1) = 0
'f=1 表示逆时针数 c 个,f=-1 表示顺时针数 c 个
Function teachount(ByVal p As Integer, ByVal f As Integer, ByVal c As Integer) As Integer
Do While c > 0
③
Do While stu(p) = 0
End Function
(1)加框处的语句有错误,请改正:______________________________________________
(2)请将①处的语句补充完整:______________________________________________
(3)请将②处的语句补充完整:______________________________________________
(4)请将③处的语句补充完整:______________________________________________
程序开始时在 Text1 中输入同学数 n,在 Text2 中输入 k 的值,在 Text3 中输入 m 的值,点击“开始” 按钮,在 label5 中显示依次出圈的学生编号。程序运行如图所示:

VB 程序如下,请将按要求答题:
Dim stu(1 To 1000) As Integer
Dim n As Integer
Private Sub Command1_Click()
Dim left, k, m As Integer
Dim stup1, stup2 As Integer
n = Val(Text1.Text)
k = Val(Text2.Text)
m = Val(Text3.Text)
①stup1 = n: stup2 = 1
For i = 1 To n
stu(i) = i Next i
Do While left > 0
stup1 = teachount(stup1, 1, k)
stup2 =

Label5.Caption = Label5.Caption & " " & Str(stup1)
left = left - 1
If ② Then
Label5.Caption = Label5.Caption & " " & Str(stup2)
left = left - 1
End If stu(stup1) = 0
stu(stup2) = 0
Loop
End Sub'f=1 表示逆时针数 c 个,f=-1 表示顺时针数 c 个
Function teachount(ByVal p As Integer, ByVal f As Integer, ByVal c As Integer) As Integer
Do While c > 0
③
Do While stu(p) = 0
p = (p + f + n - 1) Mod n + 1
Loopc = c - 1
Loop teachount = pEnd Function
(1)加框处的语句有错误,请改正:______________________________________________
(2)请将①处的语句补充完整:______________________________________________
(3)请将②处的语句补充完整:______________________________________________
(4)请将③处的语句补充完整:______________________________________________
16.
完全平方数之和。编写 VB 程序,实现如下功能:在文本框 Text1 中输入用逗号分隔的一系列整数(每个整数的绝对值不超过 1000,个数不超过 100 个),单击“计算”按钮 Command1,计算输入的整数中的完全平方数之和(完全平方数是指一个整数能表示成某个整数的平方的形式,例如 4 是完全平方数,可以表示成 2 的平方),并将结果显示在标签 Label1 中。程序运行效果如图所示。

(1)文本框 Text1不具备的属性为___(单选,填字母:
(2)实现上述功能的 VB 程序如下,请在划线处填入合适代码。
Private Sub Command1_Click()
Dim s As String
Dim i As Integer, j As Integer, ans As Long
Dim f As Boolean
ans = 0
s = Text1.Text: j = 1:____________
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch = "," Then
x = Val(Mid(s, j, i - j))
If___________Then
ans = ans + x
f = True
j = i + 1
ElseIf ch = "-" Then
f = False
j = j + 1
End If
Next i
Label1.Caption = "完全平方数之和为: " + Str(ans)
End Sub
(3)若文本框 Text1 中输入的内容为“-4,4,4”(不包括双引号),则标签 Label1 中输出的内容为“完全平方数之和为:__”。

(1)文本框 Text1不具备的属性为___(单选,填字母:
A.Text/ | B.Caption/ | C.Width/ | D.Font)。 |
Private Sub Command1_Click()
Dim s As String
Dim i As Integer, j As Integer, ans As Long
Dim f As Boolean
ans = 0
s = Text1.Text: j = 1:____________
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch = "," Then
x = Val(Mid(s, j, i - j))
If___________Then
ans = ans + x
f = True
j = i + 1
ElseIf ch = "-" Then
f = False
j = j + 1
End If
Next i
Label1.Caption = "完全平方数之和为: " + Str(ans)
End Sub
(3)若文本框 Text1 中输入的内容为“-4,4,4”(不包括双引号),则标签 Label1 中输出的内容为“完全平方数之和为:__”。
试卷分析
-
【1】题量占比
选择题:(12道)
填空题:(4道)
-
【2】:难度分析
1星难题:0
2星难题:0
3星难题:0
4星难题:0
5星难题:0
6星难题:0
7星难题:0
8星难题:0
9星难题:16