资源简介

浙江省衢州市2021届高三上学期信息技术12月教学质量检测信息技术试卷
一、选择题
1．（2020高三上·衢州月考）下列有关信息与信息技术的说法，正确的是（　　）
A．信息技术是计算机用来处理信息的一种技术
B．信息经过人的分析、综合和提炼，会有更高的使用价值
C．人们无法通过信息技术，将信息从一种形态转换为另一种形态
D．信息必须依附于某种载体，它不可以脱离它所反映的事物被存储和传播
2．（2020高三上·衢州月考）关于网页与浏览器，下列说法不正确的是（　　）
A．利用浏览器的收藏夹功能，可以方便记录网址
B．网页是通过TCP/IP协议进行浏览器与服务器之间的传输
C．网页中的文本、图像、超链接等元素是用HTML（超文本标记语言）描述的
D．在IE浏览器中，以“网页，仅HTML”类型保存网页，可以保存网页中的超链接
3．（2020高三上·衢州月考）使用Access 软件设计一个数据表，存储如图所示的文件记录数据。
编号 索引号 主题分类 发布机构 公开时间 是否有效
1 11330800002618015K/2020-117888 年底实事项目计划 市电子政务中心 2020/12/11 有效
2 002482082/2020-07211 采购计划 市电子政务中心 2020/10/12 无效
3 002482082/2020-07356 .教育 省教育厅 2020/11/19 有效
… … … … … …
下列表结构设计合理的是（　　）
A． B．
C． D．
4．（2020高三上·衢州月考）十进制正整数n转换为二进制数，该二进制数共3位，下列说法正确的是（　　）
A．该二进制数末位数码对应权值是21
B．若该二进制数的首位为1，则n必大于4
C．若该二进制数的末位为1，则n+1一定为偶数
D．该二进制数首位去掉，转换为十进制数，所得的值是n\2
5．（2020高三上·衢州月考）使用Photoshop软件制作“江雪”作品，编辑界面如图所示。下列说法正确的是（　　）
A．调整“文字”图层的不透明度，该图层的图层样式不受影响
B．若要修改“标题”图层中对象的大小，可使用“自由变换”命令
C．若要实现透明背景，可用“橡皮擦”工具擦除“背景”图层内容
D．当前状态下直接保存文档，产生的文件名为“江雪.psd”，大小为1.21MB
6．（2020高三上·衢州月考）一副未经压缩的1024*768像素的BMP图像文件，其存储容量约为768KB，则该图像每个像素色彩编码的位数为（　　）
A．1bit B．8bit C．16bit D．24bit
7．（2020高三上·衢州月考）下列VB表达式中，计算结果与其他不同的选项是（　　）
A．Len("1+4=") B．17 Mod 13 \ 2
C．Abs(Int(-4.5)) D．Val(Mid(“2020520”，5，1))
8．（2020高三上·衢州月考）某算法的部分流程图如图所示。执行这部分流程，若输入n的值为18，则输出c的值为（　　）
A．2 B．3 C．4 D．5
9．（2020高三上·衢州月考）有如下VB程序段：
a(1) = 3:a(2) = 1:a(3) = 3
a(4) = 4 :a(5) = 6
pos = 1 : n = 5
For i = 1 To 10000
pos = (pos + a(pos) - 1) Mod n + 1
Next i
执行该程序段后，pos的值是（　　）
A．0 B．1 C．3 D．4
10．（2019高三上·浙江月考）有如下VB程序段：
L = 0: R = 7: i = 1
Do While i < R
If a(i) = 0 Then
L = L + 1
t = a(i): a(i) = a(L): a(L) = t i = i + 1
ElseIf a(i) = 2 Then
R = R - 1
t = a(i): a(i) = a(R): a(R) = t
Else
i = i + 1
End If
Loop
数组元素 a(1)到 a(6)的值依次为“2，0，2，1，1，0”。执行该程序段后，下列说法不正确的是（　　）
A．变量L的值为2
B．变量R的值为5
C．变量i的值为4
D．数组元素值依次为“0，0，1，1，2，2”
11．（2020高三上·衢州月考）有如下VB程序段：
a(1) = 11 : a(2) = 14 : a(3) = 23 : a(4) = 23 : a(5) = 30 : a(6) = 42
key = Val(Text1.Text)
L = 1 : R = 6 : x = 0
Randomize
Do while L <= R
mid = Int(Rnd() * (R-L+1))+ L
If a(mid) = key Then
Exit Do
ElseIf a(mid) > key Then
R = mid - 1
x = x - 1
Else
L = mid + 1
x = x + 1
End If
Loop
If L <= R Then
Label1.Caption = "查找成功，" + "位置为" + str(mid)
Else
Label1.Caption = "查找失败"
End If
该程序执行后，在文本框Text1中输入23，则x的值不可能是（　　）
A．-3 B．-2 C．1 D．2
12．（2020高三上·衢州月考）某字符串s是由一个原始字符串反复重叠形成的。例如字符串"abcababcababcab"的是由原始字符串"abcab"重叠而成。为查找字符串s的原始字符串，有如下VB程序段:
s = "abcababcababcab": L = Len(s)
For t = 1 To L \ 2 '枚举可能的原始长度
If L Mod t = 0 Then
For i = t + 1 To L Step t
If ① <> Mid(s， 1， t) Then Exit For
Next i
If i = L + 1 Then ans = ② : Exit For
End If
Next t
Text1.Text = ans
上述程序段划线处①②语句依次可为（　　）
A．①Mid(s， i， t) ②Mid(s， 1， t)
B．①Mid(s， i， t) ②Mid(s， t， 1)
C．①Mid(s， i Mod t， 1) ②Mid(s， 1， t)
D．①Mid(s， i Mod t， 1) ②Mid(s， t， 1)
二、非选择题
13．（2020高三上·衢州月考）小吴收集了NBA现役巨星的职业生涯数据，并用Excel软件进行数据处理，如图a所示。
图a
请回答下列问题：
（1）如图a中所示，小吴已计算了G3单元格中的数据。他希望将单元格G3中的公式向下自动填充至G15，并正确计算出区域G3：G15中的数据，则G3单元格中的公式应修改为　 　。
（2）根据图a中数据制作的图表如图b所示，创建该图表的数据区域是H9:J10，　 　。
图b
（3）若要对图a中的后卫球员以“罚球命中率%”为关键字进行降序排序，则排序选择的数据区域是　 　。
（4）对区域A1：J15的数据进行筛选，设置“投篮命中率%”和“三分命中率%”的筛选方式均如图c所示，则筛选出　 　（填数字）项数据。
图c
14．（2020高三上·衢州月考）小吴在疫情期间制作了“疫情防控宣传”动画，编辑界面如图所示。
图a
请回答下列问题。
（1）在制作作品前，进行了相应的分析和规划。下列属于需求分析的是 （多选，填字母：）
A．确定各种素材的获取方式
B．确定作品的主题与基本内容
C．确定制作所需的软件
D．设计作品结构
E．设计网络调查问卷用以分析不同群体对疫情的了解程度如何
（2）如图a所示，其中“文字”图层内容在动画停止播放后仍旧保持闪烁效果，则该图层中对象的元件类型为　 　。
（3）若要“背景”图层中的音乐在动画播放1秒后开始播放，且不影响其他动画效果，则“背景”图层可进行的操作为 （单选，填字母 ）
A．将第1帧拖动至第12帧，并将第12帧舞台上的内容复制粘贴到第1帧
B．在第12帧插入关键帧，并删除第1帧中的声音
C．选中第1帧执行“剪切帧”，选中第12帧执行“粘贴帧”
（4）若要“文字”图层在第25帧到第30帧内容完全消失，且其他动画效果保持不变，则可进行的操作为　 　。
（5）测试影片时，单击当前场景的“其他”按钮，打开网站：“http://www.”，则“其他”按钮的动作脚本为　 　。
15．（2020高三上·衢州月考）小吴研究插入排序算法，若对无序数列5，2，9，5，3，利用传统的简单插入排序进行升序排序，其方法如下：
首先将5取出，得到序列5；
第二步将2取出，插入序列得到2，5；
第三步将9取出，插入后得到2，5，9；
第四步将5取出，插入后得到2，5，5，9；
第五步将3取出，插入后得到2，3，5，5，9，排序完成。
小吴对这种插入排序进行了一些改进，将无序数列存入a数组中，将排序后的数据存入b数组中，同时保证b数组不存在重复的数字。对于重复出现的数字，用cnt数组记录重复个数。例如无序数列8、6、7、4、4、9、1、9、9、8，a(1)～a(10)存储原数据，b(1)～b(6)存储排序后的不重复数据，cnt(1)～cnt(6)存储每个数字重复的个数，如图a所示。
数组/下标 1 2 3 4 5 6
b 1 4 6 7 8 9
cnt 1 2 1 1 2 3
图a
程序运行后，自动随机生成原数组并显示在列表框List1中，点击按钮“开始”后，生成升序排序数组并显示在列表框List2中，程序运行界面如图b所示。
图b
请回答下列问题。
（1）若要在窗体载入后让窗体标题显示“排序改进算法”，则下列操作可行的是 （单选，填字母。）
A．直接将窗体属性栏中的“Text”属性值修改为“排序改进算法”
B．在程序的Form_Load()事件中写上代码 Form1.Caption =“排序改进算法”
C．在程序的Command1_Click()事件中写上代码Form1.Caption =“排序改进算法”
（2）请完成程序中的填空。
Const n = 10
Dim a(0 To 100) As Integer， b(0 To 100) As Integer， cnt(1 To 100) As Integer
Dim Ln As Integer， pos As Integer 'Ln表示b数组的长度
Function search(key As Integer)
Dim i As Integer
For i = 1 To Ln
If b(i) >= key Then Exit For
Next i
search = i
End Function
Private Sub Command1_Click()
Dim i As Integer， j As Integer
Ln = 0
For i = 1 To n
pos = 　 　
If b(pos) <> a(i) Then
Ln = Ln + 1
j = Ln
Do While j > pos
b(j) = b(j - 1)
　 　
j = j - 1
Loop
b(j) = a(i)
cnt(pos) = 1
Else
End If
Next i
For i = 1 To Ln
For j = 1 To cnt(i)
List2.AddItem Str(b(i))
Next j
Next i
End Sub
Private Sub Form_Load()
For i = 1 To n
a(i) = Rnd() * 10 + 1
List1.AddItem Str(a(i))
Next i
End Sub
（3）程序中加框处存在错误，请改正。
16．（2020高三上·衢州月考）在挖金矿小游戏中，玩家通过指令控制小人运动，小人按照一定的规则将地底的金矿全部收集完毕。现将地底的截面可用一个n*n的矩阵表示，其中第一行表示地面，不会出现金矿；第2行至第n行表示地底。每一行中黑色格子表示金矿，白色格子表示空地，其中小人在矩阵左上角第一行第一列的位置。
玩家通过4种指令控制小人运动：
· 左 X：小人向左移动X个格子
· 右 X：小人向右移动X个格子
· 下 X：小人向下移动X个格子
· 挖矿：收集小人所在格子的金矿
小人收集金矿需要遵循一定的规则：
①小人必须将当前行的金矿全部收集，才能去往下一行，即金矿需从上到下收集
②对于同一行的金矿，小人必须按照从左往右的顺序开始收集
现编写程序，以8*8的矩阵为例，在文本框Text1中输入金矿数量，点击按钮“开始”后，随机产生对应数量的金矿并借助图形控件输出（保证不会在同一个格子出现两个金矿），并且在列表框List1中按顺序输出指令，使小人按照规则得到所有金矿。如图a所示。请回答下列问题。
图a
（1）现有4*4的地底截面如图b所示，小人在左上角位置，请写出任意一种可使小人按规则获得所有金矿的指令（指令之间用逗号或空格隔开）　 　。
图b
（2）请完成程序中的填空。
Const n = 8 '程序以8*8的矩阵为例
Dim x(1 To n*n) As Integer, y(1 To n*n) As Integer '存储所有金矿的位置
Dim px As Integer, py As Integer '存储小人所在的位置
Dim i As Integer, j As Integer, m As Integer, tmp As Integer
Private Sub Command1_Click()
m = Val(Text1.Text)
Randomize
'随机产生m个金矿并通过图形控件显示在界面上，代码略
For i = 1 To m - 1
For j = 1 To m - i
'将所有金矿按照从上到下、从左到右的顺序排序，以符合题目描述的规则
If x(j) > x(j + 1) Or 　 　Then
tmp = x(j): x(j) = x(j + 1): x(j + 1) = tmp
tmp = y(j): y(j) = y(j + 1): y(j + 1) = tmp
End If
Next j
Next i
px = 1: py = 1
i = 1: j = 1
Do While j <= m
Do While x(j) = x(j + 1) And j <= m
j = j + 1
Loop
If y(i) < py Then
List1.AddItem "左" + Str(py - y(i))
ElseIf y(i) > py Then
List1.AddItem "右" + Str(y(i) - py)
End If
List1.AddItem "下" + Str　 　)
List1.AddItem "挖矿"
For k = i + 1 To j
List1.AddItem "右" + Str(y(k) - y(k - 1))
List1.AddItem "挖矿"
Next k
px = x(j)
　 　
j = j + 1
i = j
Loop
End Sub
答案解析部分
1．【答案】B
【知识点】信息及其特征；信息技术的概念与关键技术
【解析】【解答】选项A：信息技术是主要用于管理和处理信息所采用的各种技术的总称；选项B：信息经过人的分析、综合和提炼，会有更高的使用价值；选项C：人们可以通过信息技术，将信息从一种形态转换为另一种形态，如文本信息转换为音频信息；选项D：信息必须依附于某种载体，可以脱离它所反映的事物被存储和传播。故答案选B。
【分析】本题考查的是信息与信息技术。信息是指以声音、语言、文字、图像、动画、气味等方式所表示的实际内容，是事物的运动状态及其状态变化的方式。信息技术是指一切与信息的获取加工表达交流管理和评价等有关的技术。信息必须依附于某种载体，载体不是信息，同一信息可以依附于不同的载体，声音、语言、文字、图像、视频、音频等都可以称之为信息的载体。
2．【答案】B
【知识点】网络资源的类型、下载与保存；浏览器；网页、网站的概念与联系
【解析】【解答】选项A：利用浏览器的收藏夹功能，可以方便记录网址；选项B：网页是通过HTTP协议进行浏览器与服务器之间的传输；选项C：网页中的文本、图像、超链接等元素是用HTML（超文本标记语言）描述的；选项D：在IE浏览器中，以“网页，仅HTML”类型保存网页，可以保存网页中的超链接。故答案选B。
【分析】本题主要考查的是网页和浏览器。网页是一个包含HTML标签的纯文本文件，要通过网页浏览器来阅读，网页之间遵循超文本传输协议（HTTP）进行相互链接访问。
网页的保存：
1.网页，全部(*.htm；*.html)：保存的网页文件包含文本、超链接、图片等内容，同时，系统会自动把该网页中包含的所有图片以及其他相关文件，保存在一个与网页同名、后缀加“.files”或“_files”的文件夹中。
2.Web档案，单个文件(*.mht)：将网页的所有内容，保存在单个文件中。
3.网页，仅HTML(*htm；*.hml)：保存的网页文件包含文本、超链接等内容，不包含图片等多媒体素材。
4.文本文件(*.xt)：只保存网页中的文本内容。
3．【答案】A
【知识点】字段的数据类型；数据表的创建
【解析】【解答】由图可知，文件编号的数据类型适合于自动编号类型，索引编号内有数字、字母及符号，故其数据类型适合于文本类型，故排除B、C、D选项。故答案选A。
【分析】本题考查的是Access数据表的设计。数据表的每一列称为一个字段，每一行（除标题行）称为一条记录。Access提供的主要字段数据类型有：文本、数字、日期/时间、货币、自动编号、是/否等。自动编号是一个唯一的顺序号（递增或随机）、用户无法直接修改其值。“是/否”类型存储逻辑值，仅能取两个值，“货币”类型存储货币值数据，如金额、价格等。
4．【答案】C
【知识点】进制及数制转换
【解析】【解答】选项A：该二进制数末位数码对应权值是20；选项B：若该二进制数的首位为1，则n大于或等于4；选项C：若该二进制数的末位为1，则n一定为奇数，则n+1一定为偶数；选项D：若该二进制数为111，则n为7，首位去掉，所得的二进制数是11，对应十进制是3（不是n\2）。故答案选C。
【分析】本题考查的是进制的转换。十进制整数转换为二进制整数采用除2取余法。用2整除十进制整数，可以得到一个商和余数；再用2去除商，又会得到一个商和余数，如此进行，直到商为小于1时为止，然后把先得到的余数作为二进制数的低位有效位，后得到的余数作为二进制数的高位有效位，依次排列起来。
5．【答案】B
【知识点】图片加工常用工具的使用；图层及图层的基本操作
【解析】【解答】选项A：调整“文字”图层的不透明度，该图层的图层样式会受影响；选项B：若要修改“标题”图层中对象的大小，可使用“自由变换”命令；选项C：若要实现透明背景，可将背景用选择工具选中，按“delete”键，“橡皮擦”工具擦除“背景”图层内容，不可实现背景透明；选项D：1.21MB是当前文档的大小，4.61MB是Photoshop占内存的大小。故答案选B。
【分析】本题考查的是Photoshop相关知识。新建图层、重命名图层、删除图层、调整图层的叠放顺序、设置图层不透明度、添加图层样式等单个对图层操作，不会影响其它图层的内容。
6．【答案】B
【知识点】声音、图像、视频编码
【解析】【解答】由图像存储量共识可得出：1024*768*颜色深度/8/1024=768KB，可得颜色深度=8bit，故该图像每个像素色彩编码的位数为8bit。故答案选B。
【分析】本题考查的是图像文件存储量。在计算图像存储容量时可采用公式：图像文件存储量=水平像素×垂直像素×每个像素所需位数／8（字节）。
7．【答案】A
【知识点】运算符、基本运算与表达式；常用标准函数
【解析】【解答】选项A：Len("1+4=")=4；选项B：17 Mod 13 \ 2=17 Mod 6=5；选项C：Abs(Int(-4.5))=Abs(-5)=5；选项D：Val(Mid(“2020520”，5，1))=Val(“5”)=5。故答案选A。
【分析】本题考查的是VB函数功能及表达式的运算。Len()函数是返回字符串的长度，Abs()是求绝对值函数，Int(x)是返回不大于x的最大整数，Val()是将字符串转换为整型，Mid()是字符串截取函数。“\”的优先级大于Mod（取余）
8．【答案】C
【知识点】流程图识读
【解析】【解答】初始值：n=18，i=2，c=1，
第一遍循环，n mod i=18 mod 2=0，n=n\i=18\2=9，c=c+1=2；
第二遍循环，n mod i=9 mod 2=1，i=i+1=3；
第三遍循环，n mod i=9 mod 3=0，n=n\i=9\3=3，c=c+1=3；
第四遍循环 ，n mod i=3 mod 3=0，n=n\i=3\3=1，c=c+1=4；
第五遍循环，不满足i<=n，退出循环。
执行这部分流程，输出c的值为4。故答案选C。
【分析】本题考查的是对算法流程图的识读。
9．【答案】D
【知识点】循环结构语句及程序实现
【解析】【解答】pos=1，n=5，
当i=1时，pos= (1+ a(1) - 1) Mod 5 + 1=4；
当i=2时，pos= (4 + a(4) - 1) Mod 5+ 1=3；
当i=3时，pos= (3 + a(3) - 1) Mod 5 + 1=1。
pos的值每三次循环一次，依次为1、4、3。
故当i=9999时，pos=1；当i=10000时，pos=4。
程序结束时，pos的值是4。故答案选D。
【分析】本题主要考查的是VB循环结构程序的执行。
10．【答案】C
【知识点】算法的控制结构；常见数据类型、数组；常量、变量及变量的赋值
【解析】【解答】程序的执行过程：i=1，a(1)=2，执行第一次循环后R=6，执行第二次循环前i=1，a(1)=0，L=1，执行后i=2，执行第三次循环后L=2，i=3，执行第四次循环后i=3，R=5，再依次执行两次循环后i=5，跳出循环。经过四次交换后， 数组元素值依次为“0，0，1，1，2，2” ，变量i的最终值为5。故答案选C。
【分析】此题考查对while循环和if选择结构及交换变量值的应用。
11．【答案】A
【知识点】查找算法及程序实现
【解析】【解答】key=23，L=1，R=6，x=0，第一种情况：mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=1时，a(1)第二种情况：当mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=2时，a(mid)第三种情况：当mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=5时，a(5)>key，R=mid-1=4，x=x-1=-1，继续循环，mid= Int(Rnd() * (4-3+1))+3，mid是随机生成[3，4]之间的整数，当mid=4时，程序结束，故x可能是-1；
第四种情况：当mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=6时，a(6)>key，R=mid-1=5，x=x-1=-1，继续循环，mid = Int(Rnd() * (5-3+1))+3，mid是随机生成[3，5]之间的整数，当mid=5时，a(5)>key，R=mid-1=4，x=x-1=-2，继续循环，mid = Int(Rnd() * (4-3+1))+3，mid是随机生成[3，4]之间的整数，当mid=4时，程序结束，故x可能是-2。
该程序执行后，在文本框Text1中输入23，则x的值不可能是-3。故答案选A。
【分析】本题主要考查的是查找算法。
12．【答案】A
【知识点】程序的调试及运行；查找算法及程序实现
【解析】【解答】①t是枚举可能的长度，此处通过for循环判断从字符串s中位置i处截取长度为t的子串与从字符串s中位置1处截取长度为t的子串进行比较，若不相等则退出循环，若相等则进行判断下一个可能的长度，可填Mid(s， i， t)。②如果i=L+1，则已到末尾，已找到原始字符串，即为从字符串s中位置1开始截取长度为t的子串赋给变量ans，可填Mid(s， 1， t)。故答案选A。
【分析】本题主要考查VB程序的调试与运行发。
13．【答案】（1）=RANK(F3，F$3:F$15)或 =RANK(F3，$F$3:$F$15)
（2）B2，H2:J2，B9:B10
（3）B10:J15
（4）1
【知识点】表格数据的基本操作；表格数据的图表呈现
【解析】【解答】（1）排序的公式是=RANK()，排序区域是F3:F15，自动填充过程中，需要固定不变，需要绝对引用，故G3单元格中的公式应修改为=RANK(F3，F$3:F$15)或 =RANK(F3，$F$3:$F$15)。
（2）观察图b，可知涉及的数据列有B列、H列、J列，故创建该图表的数据区域是H9:J10，B2，H2:J2，B9:B10。
（3）若要对图a中的后卫球员以“罚球命中率%”为关键字进行降序排序，则排序选择的数据区域是B10:J15。故答案为：B10:J15。
（4）由图可知，筛选条件是同时满足“投篮命中率%”和“三分命中率%”的最大的3项，筛选出的是德怀特-霍华德，1项数据。故答案为：1。
【分析】本题考查的是Excel中公式的应用、图表数据源的选取以及数据的排序与筛选。在选择图表数据区域时，要看其横轴和纵轴的数据。对数据的筛选分为“自动筛选”和“高级筛选”。通过对数据筛选条件的设置，可以筛选出所需的数据。对数据排序要选定需要排序的所有单元格，使用“数据”菜单中的“排序”命令，选择关键字及排序方式进行排序。
14．【答案】（1）B；C；E
（2）影片剪辑
（3）A
（4）选中“文字”图层第25到30帧，执行“清除帧”或对“文字”图层31帧执行“插入关键帧”，再对25帧执行“插入空白关键帧”
（5）on(press){getURL(“http://www.”);}或on(release){getURL(“http://www.”);}
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；元件的类型与应用；常用影片控制函数的应用
【解析】【解答】（1）多媒体作品的需求分析包括应用需求和创作需求。应用需求分析包括：1、社会需求分析；2、作品效益分析；3、用户情况分析三部分。而主题思想分析属于创作需求分析。故确定作品的主题与基本内容、确定制作所需的软件、设计网络调查问卷用以分析不同群体对疫情的了解程度如何属于需求分析。故答案选BCE。
（2）影片剪辑是包含在flash影片中的影片片段，有自己的时间轴和属性，故该图层中对象的元件类型为影片剪辑。
（3）fps是12，即1秒12帧，故要“背景”图层中的音乐在动画播放1秒后开始播放，且不影响其他动画效果，则“背景”图层可进行的操作为将第1帧拖动至第12帧，并将第12帧舞台上的内容复制粘贴到第1帧。故答案选A。
（4）若要“文字”图层在第25帧到第30帧内容完全消失，且其他动画效果保持不变，则可进行的操作为选中“文字”图层第25到 30 帧，执行“清除帧”或对“文字”图层 31 帧执行“插入关键帧”，再对 25 帧执行“插入空白关键帧”。
（5）在场景中的某一个按钮上添加getURL指令，按钮被触发时，动画链接到getURL参数指定的页面地址。故测试影片时，单击当前场景的“其他”按钮，打开网站：“http://www.”，则“其他”按钮的动作脚本为on(press){getURL(“http://www.”);} 或on(release){getURL(“http://www.”);}。
【分析】本题考查的是多媒体作品的设计过程、元件类型、动画效果的实现以及动作脚本的设置。多媒体作品设计的一般过程：需求分析、规划设计、脚本编写。需求分析包括应用需求分析和创作需求分析。规划设计包括系统结构设计和功能模块设计。需求分析包括：应用需求分析和创作需求分析。应用需求分析包括社会需求、用户情况、作品效益等；创作需求分析包括主题思想、结构类型、作品内容、设施要求、发布方式等。
15．【答案】（1）B
（2）search(a(i))；cnt(j)=cnt(j-i)
（3）cnt(pos)=cnt(pos)+1
【知识点】排序算法及程序实现
【解析】【解答】（1）题干要求在窗体标题显示“排序改进算法”，故在程序的Form_Load()事件中写上代码 Form1.Caption =“排序改进算法”。故答案选B。
（2）第一空：search()函数是按升序寻找关键字key在数组b中的位置i，找到后返回位置i，此处通过for循环寻找数组a中每一个元素在数组b中的位置，找到后将其赋给变量pos。故答案为：search(a(i))。
第二空：此处while循环是实现移动数组b中的元素（当关键字比数组b中位置j的值小时，需要后移，即j-1处的值移到j处），故b(j) = b(j - 1)，cnt(j)=cnt(j-i)，同时j递减，在位置j处插入数据a(i)。故答案为：cnt(j)=cnt(j-i)。
（3）此处是执行if条件结构的else部分，即pos位置处出现了重复值，故cnt(pos)需要递增，故此处应改为cnt(pos)=cnt(pos)+1。
【分析】本题考查的是VB排序算法。
16．【答案】（1）下1挖矿 下2挖矿 右3挖矿或下 1，挖矿，下 2，挖矿，右 3，挖矿
（2）x(j)= x(j + 1) And y(j)>y(j + 1)；x(j)-px；py=y(j)
【知识点】程序的调试及运行；分支结构语句及程序实现；循环结构语句及程序实现
【解析】【解答】（1）由图可知，可写指令：下1挖矿 下2挖矿 右3挖矿或下 1，挖矿，下 2，挖矿，右 3，挖矿。
（2）第一空：按照要求，将所有金矿按照从上到下、从左到右的顺序排序，以符合题目描述的规则，故当x(j)大于x(j+1)或当x(j)等于x(j+1)且y(j)大于y(j+1)时，交换x(j)与x(j+1)，y(j)与y(j+1)，故答案为：x(j)= x(j + 1) And y(j)>y(j + 1)。
第二空：移动顺序是在当前行移动，收集完再去下一行，下移的长度是x(j)-px（金矿的位置减去小人的x坐标），故答案为：x(j)-px。
第三空：此处在挖矿后，更新小人的位置（将当前金矿的位置赋给小人的位置），px = x(j)，py=y(j)，故答案为：py=y(j)。
【分析】本题考查的是VB程序的执行与调试。
1 / 1浙江省衢州市2021届高三上学期信息技术12月教学质量检测信息技术试卷
一、选择题
1．（2020高三上·衢州月考）下列有关信息与信息技术的说法，正确的是（　　）
A．信息技术是计算机用来处理信息的一种技术
B．信息经过人的分析、综合和提炼，会有更高的使用价值
C．人们无法通过信息技术，将信息从一种形态转换为另一种形态
D．信息必须依附于某种载体，它不可以脱离它所反映的事物被存储和传播
【答案】B
【知识点】信息及其特征；信息技术的概念与关键技术
【解析】【解答】选项A：信息技术是主要用于管理和处理信息所采用的各种技术的总称；选项B：信息经过人的分析、综合和提炼，会有更高的使用价值；选项C：人们可以通过信息技术，将信息从一种形态转换为另一种形态，如文本信息转换为音频信息；选项D：信息必须依附于某种载体，可以脱离它所反映的事物被存储和传播。故答案选B。
【分析】本题考查的是信息与信息技术。信息是指以声音、语言、文字、图像、动画、气味等方式所表示的实际内容，是事物的运动状态及其状态变化的方式。信息技术是指一切与信息的获取加工表达交流管理和评价等有关的技术。信息必须依附于某种载体，载体不是信息，同一信息可以依附于不同的载体，声音、语言、文字、图像、视频、音频等都可以称之为信息的载体。
2．（2020高三上·衢州月考）关于网页与浏览器，下列说法不正确的是（　　）
A．利用浏览器的收藏夹功能，可以方便记录网址
B．网页是通过TCP/IP协议进行浏览器与服务器之间的传输
C．网页中的文本、图像、超链接等元素是用HTML（超文本标记语言）描述的
D．在IE浏览器中，以“网页，仅HTML”类型保存网页，可以保存网页中的超链接
【答案】B
【知识点】网络资源的类型、下载与保存；浏览器；网页、网站的概念与联系
【解析】【解答】选项A：利用浏览器的收藏夹功能，可以方便记录网址；选项B：网页是通过HTTP协议进行浏览器与服务器之间的传输；选项C：网页中的文本、图像、超链接等元素是用HTML（超文本标记语言）描述的；选项D：在IE浏览器中，以“网页，仅HTML”类型保存网页，可以保存网页中的超链接。故答案选B。
【分析】本题主要考查的是网页和浏览器。网页是一个包含HTML标签的纯文本文件，要通过网页浏览器来阅读，网页之间遵循超文本传输协议（HTTP）进行相互链接访问。
网页的保存：
1.网页，全部(*.htm；*.html)：保存的网页文件包含文本、超链接、图片等内容，同时，系统会自动把该网页中包含的所有图片以及其他相关文件，保存在一个与网页同名、后缀加“.files”或“_files”的文件夹中。
2.Web档案，单个文件(*.mht)：将网页的所有内容，保存在单个文件中。
3.网页，仅HTML(*htm；*.hml)：保存的网页文件包含文本、超链接等内容，不包含图片等多媒体素材。
4.文本文件(*.xt)：只保存网页中的文本内容。
3．（2020高三上·衢州月考）使用Access 软件设计一个数据表，存储如图所示的文件记录数据。
编号 索引号 主题分类 发布机构 公开时间 是否有效
1 11330800002618015K/2020-117888 年底实事项目计划 市电子政务中心 2020/12/11 有效
2 002482082/2020-07211 采购计划 市电子政务中心 2020/10/12 无效
3 002482082/2020-07356 .教育 省教育厅 2020/11/19 有效
… … … … … …
下列表结构设计合理的是（　　）
A． B．
C． D．
【答案】A
【知识点】字段的数据类型；数据表的创建
【解析】【解答】由图可知，文件编号的数据类型适合于自动编号类型，索引编号内有数字、字母及符号，故其数据类型适合于文本类型，故排除B、C、D选项。故答案选A。
【分析】本题考查的是Access数据表的设计。数据表的每一列称为一个字段，每一行（除标题行）称为一条记录。Access提供的主要字段数据类型有：文本、数字、日期/时间、货币、自动编号、是/否等。自动编号是一个唯一的顺序号（递增或随机）、用户无法直接修改其值。“是/否”类型存储逻辑值，仅能取两个值，“货币”类型存储货币值数据，如金额、价格等。
4．（2020高三上·衢州月考）十进制正整数n转换为二进制数，该二进制数共3位，下列说法正确的是（　　）
A．该二进制数末位数码对应权值是21
B．若该二进制数的首位为1，则n必大于4
C．若该二进制数的末位为1，则n+1一定为偶数
D．该二进制数首位去掉，转换为十进制数，所得的值是n\2
【答案】C
【知识点】进制及数制转换
【解析】【解答】选项A：该二进制数末位数码对应权值是20；选项B：若该二进制数的首位为1，则n大于或等于4；选项C：若该二进制数的末位为1，则n一定为奇数，则n+1一定为偶数；选项D：若该二进制数为111，则n为7，首位去掉，所得的二进制数是11，对应十进制是3（不是n\2）。故答案选C。
【分析】本题考查的是进制的转换。十进制整数转换为二进制整数采用除2取余法。用2整除十进制整数，可以得到一个商和余数；再用2去除商，又会得到一个商和余数，如此进行，直到商为小于1时为止，然后把先得到的余数作为二进制数的低位有效位，后得到的余数作为二进制数的高位有效位，依次排列起来。
5．（2020高三上·衢州月考）使用Photoshop软件制作“江雪”作品，编辑界面如图所示。下列说法正确的是（　　）
A．调整“文字”图层的不透明度，该图层的图层样式不受影响
B．若要修改“标题”图层中对象的大小，可使用“自由变换”命令
C．若要实现透明背景，可用“橡皮擦”工具擦除“背景”图层内容
D．当前状态下直接保存文档，产生的文件名为“江雪.psd”，大小为1.21MB
【答案】B
【知识点】图片加工常用工具的使用；图层及图层的基本操作
【解析】【解答】选项A：调整“文字”图层的不透明度，该图层的图层样式会受影响；选项B：若要修改“标题”图层中对象的大小，可使用“自由变换”命令；选项C：若要实现透明背景，可将背景用选择工具选中，按“delete”键，“橡皮擦”工具擦除“背景”图层内容，不可实现背景透明；选项D：1.21MB是当前文档的大小，4.61MB是Photoshop占内存的大小。故答案选B。
【分析】本题考查的是Photoshop相关知识。新建图层、重命名图层、删除图层、调整图层的叠放顺序、设置图层不透明度、添加图层样式等单个对图层操作，不会影响其它图层的内容。
6．（2020高三上·衢州月考）一副未经压缩的1024*768像素的BMP图像文件，其存储容量约为768KB，则该图像每个像素色彩编码的位数为（　　）
A．1bit B．8bit C．16bit D．24bit
【答案】B
【知识点】声音、图像、视频编码
【解析】【解答】由图像存储量共识可得出：1024*768*颜色深度/8/1024=768KB，可得颜色深度=8bit，故该图像每个像素色彩编码的位数为8bit。故答案选B。
【分析】本题考查的是图像文件存储量。在计算图像存储容量时可采用公式：图像文件存储量=水平像素×垂直像素×每个像素所需位数／8（字节）。
7．（2020高三上·衢州月考）下列VB表达式中，计算结果与其他不同的选项是（　　）
A．Len("1+4=") B．17 Mod 13 \ 2
C．Abs(Int(-4.5)) D．Val(Mid(“2020520”，5，1))
【答案】A
【知识点】运算符、基本运算与表达式；常用标准函数
【解析】【解答】选项A：Len("1+4=")=4；选项B：17 Mod 13 \ 2=17 Mod 6=5；选项C：Abs(Int(-4.5))=Abs(-5)=5；选项D：Val(Mid(“2020520”，5，1))=Val(“5”)=5。故答案选A。
【分析】本题考查的是VB函数功能及表达式的运算。Len()函数是返回字符串的长度，Abs()是求绝对值函数，Int(x)是返回不大于x的最大整数，Val()是将字符串转换为整型，Mid()是字符串截取函数。“\”的优先级大于Mod（取余）
8．（2020高三上·衢州月考）某算法的部分流程图如图所示。执行这部分流程，若输入n的值为18，则输出c的值为（　　）
A．2 B．3 C．4 D．5
【答案】C
【知识点】流程图识读
【解析】【解答】初始值：n=18，i=2，c=1，
第一遍循环，n mod i=18 mod 2=0，n=n\i=18\2=9，c=c+1=2；
第二遍循环，n mod i=9 mod 2=1，i=i+1=3；
第三遍循环，n mod i=9 mod 3=0，n=n\i=9\3=3，c=c+1=3；
第四遍循环 ，n mod i=3 mod 3=0，n=n\i=3\3=1，c=c+1=4；
第五遍循环，不满足i<=n，退出循环。
执行这部分流程，输出c的值为4。故答案选C。
【分析】本题考查的是对算法流程图的识读。
9．（2020高三上·衢州月考）有如下VB程序段：
a(1) = 3:a(2) = 1:a(3) = 3
a(4) = 4 :a(5) = 6
pos = 1 : n = 5
For i = 1 To 10000
pos = (pos + a(pos) - 1) Mod n + 1
Next i
执行该程序段后，pos的值是（　　）
A．0 B．1 C．3 D．4
【答案】D
【知识点】循环结构语句及程序实现
【解析】【解答】pos=1，n=5，
当i=1时，pos= (1+ a(1) - 1) Mod 5 + 1=4；
当i=2时，pos= (4 + a(4) - 1) Mod 5+ 1=3；
当i=3时，pos= (3 + a(3) - 1) Mod 5 + 1=1。
pos的值每三次循环一次，依次为1、4、3。
故当i=9999时，pos=1；当i=10000时，pos=4。
程序结束时，pos的值是4。故答案选D。
【分析】本题主要考查的是VB循环结构程序的执行。
10．（2019高三上·浙江月考）有如下VB程序段：
L = 0: R = 7: i = 1
Do While i < R
If a(i) = 0 Then
L = L + 1
t = a(i): a(i) = a(L): a(L) = t i = i + 1
ElseIf a(i) = 2 Then
R = R - 1
t = a(i): a(i) = a(R): a(R) = t
Else
i = i + 1
End If
Loop
数组元素 a(1)到 a(6)的值依次为“2，0，2，1，1，0”。执行该程序段后，下列说法不正确的是（　　）
A．变量L的值为2
B．变量R的值为5
C．变量i的值为4
D．数组元素值依次为“0，0，1，1，2，2”
【答案】C
【知识点】算法的控制结构；常见数据类型、数组；常量、变量及变量的赋值
【解析】【解答】程序的执行过程：i=1，a(1)=2，执行第一次循环后R=6，执行第二次循环前i=1，a(1)=0，L=1，执行后i=2，执行第三次循环后L=2，i=3，执行第四次循环后i=3，R=5，再依次执行两次循环后i=5，跳出循环。经过四次交换后， 数组元素值依次为“0，0，1，1，2，2” ，变量i的最终值为5。故答案选C。
【分析】此题考查对while循环和if选择结构及交换变量值的应用。
11．（2020高三上·衢州月考）有如下VB程序段：
a(1) = 11 : a(2) = 14 : a(3) = 23 : a(4) = 23 : a(5) = 30 : a(6) = 42
key = Val(Text1.Text)
L = 1 : R = 6 : x = 0
Randomize
Do while L <= R
mid = Int(Rnd() * (R-L+1))+ L
If a(mid) = key Then
Exit Do
ElseIf a(mid) > key Then
R = mid - 1
x = x - 1
Else
L = mid + 1
x = x + 1
End If
Loop
If L <= R Then
Label1.Caption = "查找成功，" + "位置为" + str(mid)
Else
Label1.Caption = "查找失败"
End If
该程序执行后，在文本框Text1中输入23，则x的值不可能是（　　）
A．-3 B．-2 C．1 D．2
【答案】A
【知识点】查找算法及程序实现
【解析】【解答】key=23，L=1，R=6，x=0，第一种情况：mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=1时，a(1)第二种情况：当mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=2时，a(mid)第三种情况：当mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=5时，a(5)>key，R=mid-1=4，x=x-1=-1，继续循环，mid= Int(Rnd() * (4-3+1))+3，mid是随机生成[3，4]之间的整数，当mid=4时，程序结束，故x可能是-1；
第四种情况：当mid = Int(Rnd() * (6-1+1))+ 1，mid是随机生成[1，6]之间的整数，当mid=6时，a(6)>key，R=mid-1=5，x=x-1=-1，继续循环，mid = Int(Rnd() * (5-3+1))+3，mid是随机生成[3，5]之间的整数，当mid=5时，a(5)>key，R=mid-1=4，x=x-1=-2，继续循环，mid = Int(Rnd() * (4-3+1))+3，mid是随机生成[3，4]之间的整数，当mid=4时，程序结束，故x可能是-2。
该程序执行后，在文本框Text1中输入23，则x的值不可能是-3。故答案选A。
【分析】本题主要考查的是查找算法。
12．（2020高三上·衢州月考）某字符串s是由一个原始字符串反复重叠形成的。例如字符串"abcababcababcab"的是由原始字符串"abcab"重叠而成。为查找字符串s的原始字符串，有如下VB程序段:
s = "abcababcababcab": L = Len(s)
For t = 1 To L \ 2 '枚举可能的原始长度
If L Mod t = 0 Then
For i = t + 1 To L Step t
If ① <> Mid(s， 1， t) Then Exit For
Next i
If i = L + 1 Then ans = ② : Exit For
End If
Next t
Text1.Text = ans
上述程序段划线处①②语句依次可为（　　）
A．①Mid(s， i， t) ②Mid(s， 1， t)
B．①Mid(s， i， t) ②Mid(s， t， 1)
C．①Mid(s， i Mod t， 1) ②Mid(s， 1， t)
D．①Mid(s， i Mod t， 1) ②Mid(s， t， 1)
【答案】A
【知识点】程序的调试及运行；查找算法及程序实现
【解析】【解答】①t是枚举可能的长度，此处通过for循环判断从字符串s中位置i处截取长度为t的子串与从字符串s中位置1处截取长度为t的子串进行比较，若不相等则退出循环，若相等则进行判断下一个可能的长度，可填Mid(s， i， t)。②如果i=L+1，则已到末尾，已找到原始字符串，即为从字符串s中位置1开始截取长度为t的子串赋给变量ans，可填Mid(s， 1， t)。故答案选A。
【分析】本题主要考查VB程序的调试与运行发。
二、非选择题
13．（2020高三上·衢州月考）小吴收集了NBA现役巨星的职业生涯数据，并用Excel软件进行数据处理，如图a所示。
图a
请回答下列问题：
（1）如图a中所示，小吴已计算了G3单元格中的数据。他希望将单元格G3中的公式向下自动填充至G15，并正确计算出区域G3：G15中的数据，则G3单元格中的公式应修改为　 　。
（2）根据图a中数据制作的图表如图b所示，创建该图表的数据区域是H9:J10，　 　。
图b
（3）若要对图a中的后卫球员以“罚球命中率%”为关键字进行降序排序，则排序选择的数据区域是　 　。
（4）对区域A1：J15的数据进行筛选，设置“投篮命中率%”和“三分命中率%”的筛选方式均如图c所示，则筛选出　 　（填数字）项数据。
图c
【答案】（1）=RANK(F3，F$3:F$15)或 =RANK(F3，$F$3:$F$15)
（2）B2，H2:J2，B9:B10
（3）B10:J15
（4）1
【知识点】表格数据的基本操作；表格数据的图表呈现
【解析】【解答】（1）排序的公式是=RANK()，排序区域是F3:F15，自动填充过程中，需要固定不变，需要绝对引用，故G3单元格中的公式应修改为=RANK(F3，F$3:F$15)或 =RANK(F3，$F$3:$F$15)。
（2）观察图b，可知涉及的数据列有B列、H列、J列，故创建该图表的数据区域是H9:J10，B2，H2:J2，B9:B10。
（3）若要对图a中的后卫球员以“罚球命中率%”为关键字进行降序排序，则排序选择的数据区域是B10:J15。故答案为：B10:J15。
（4）由图可知，筛选条件是同时满足“投篮命中率%”和“三分命中率%”的最大的3项，筛选出的是德怀特-霍华德，1项数据。故答案为：1。
【分析】本题考查的是Excel中公式的应用、图表数据源的选取以及数据的排序与筛选。在选择图表数据区域时，要看其横轴和纵轴的数据。对数据的筛选分为“自动筛选”和“高级筛选”。通过对数据筛选条件的设置，可以筛选出所需的数据。对数据排序要选定需要排序的所有单元格，使用“数据”菜单中的“排序”命令，选择关键字及排序方式进行排序。
14．（2020高三上·衢州月考）小吴在疫情期间制作了“疫情防控宣传”动画，编辑界面如图所示。
图a
请回答下列问题。
（1）在制作作品前，进行了相应的分析和规划。下列属于需求分析的是 （多选，填字母：）
A．确定各种素材的获取方式
B．确定作品的主题与基本内容
C．确定制作所需的软件
D．设计作品结构
E．设计网络调查问卷用以分析不同群体对疫情的了解程度如何
（2）如图a所示，其中“文字”图层内容在动画停止播放后仍旧保持闪烁效果，则该图层中对象的元件类型为　 　。
（3）若要“背景”图层中的音乐在动画播放1秒后开始播放，且不影响其他动画效果，则“背景”图层可进行的操作为 （单选，填字母 ）
A．将第1帧拖动至第12帧，并将第12帧舞台上的内容复制粘贴到第1帧
B．在第12帧插入关键帧，并删除第1帧中的声音
C．选中第1帧执行“剪切帧”，选中第12帧执行“粘贴帧”
（4）若要“文字”图层在第25帧到第30帧内容完全消失，且其他动画效果保持不变，则可进行的操作为　 　。
（5）测试影片时，单击当前场景的“其他”按钮，打开网站：“http://www.”，则“其他”按钮的动作脚本为　 　。
【答案】（1）B；C；E
（2）影片剪辑
（3）A
（4）选中“文字”图层第25到30帧，执行“清除帧”或对“文字”图层31帧执行“插入关键帧”，再对25帧执行“插入空白关键帧”
（5）on(press){getURL(“http://www.”);}或on(release){getURL(“http://www.”);}
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；元件的类型与应用；常用影片控制函数的应用
【解析】【解答】（1）多媒体作品的需求分析包括应用需求和创作需求。应用需求分析包括：1、社会需求分析；2、作品效益分析；3、用户情况分析三部分。而主题思想分析属于创作需求分析。故确定作品的主题与基本内容、确定制作所需的软件、设计网络调查问卷用以分析不同群体对疫情的了解程度如何属于需求分析。故答案选BCE。
（2）影片剪辑是包含在flash影片中的影片片段，有自己的时间轴和属性，故该图层中对象的元件类型为影片剪辑。
（3）fps是12，即1秒12帧，故要“背景”图层中的音乐在动画播放1秒后开始播放，且不影响其他动画效果，则“背景”图层可进行的操作为将第1帧拖动至第12帧，并将第12帧舞台上的内容复制粘贴到第1帧。故答案选A。
（4）若要“文字”图层在第25帧到第30帧内容完全消失，且其他动画效果保持不变，则可进行的操作为选中“文字”图层第25到 30 帧，执行“清除帧”或对“文字”图层 31 帧执行“插入关键帧”，再对 25 帧执行“插入空白关键帧”。
（5）在场景中的某一个按钮上添加getURL指令，按钮被触发时，动画链接到getURL参数指定的页面地址。故测试影片时，单击当前场景的“其他”按钮，打开网站：“http://www.”，则“其他”按钮的动作脚本为on(press){getURL(“http://www.”);} 或on(release){getURL(“http://www.”);}。
【分析】本题考查的是多媒体作品的设计过程、元件类型、动画效果的实现以及动作脚本的设置。多媒体作品设计的一般过程：需求分析、规划设计、脚本编写。需求分析包括应用需求分析和创作需求分析。规划设计包括系统结构设计和功能模块设计。需求分析包括：应用需求分析和创作需求分析。应用需求分析包括社会需求、用户情况、作品效益等；创作需求分析包括主题思想、结构类型、作品内容、设施要求、发布方式等。
15．（2020高三上·衢州月考）小吴研究插入排序算法，若对无序数列5，2，9，5，3，利用传统的简单插入排序进行升序排序，其方法如下：
首先将5取出，得到序列5；
第二步将2取出，插入序列得到2，5；
第三步将9取出，插入后得到2，5，9；
第四步将5取出，插入后得到2，5，5，9；
第五步将3取出，插入后得到2，3，5，5，9，排序完成。
小吴对这种插入排序进行了一些改进，将无序数列存入a数组中，将排序后的数据存入b数组中，同时保证b数组不存在重复的数字。对于重复出现的数字，用cnt数组记录重复个数。例如无序数列8、6、7、4、4、9、1、9、9、8，a(1)～a(10)存储原数据，b(1)～b(6)存储排序后的不重复数据，cnt(1)～cnt(6)存储每个数字重复的个数，如图a所示。
数组/下标 1 2 3 4 5 6
b 1 4 6 7 8 9
cnt 1 2 1 1 2 3
图a
程序运行后，自动随机生成原数组并显示在列表框List1中，点击按钮“开始”后，生成升序排序数组并显示在列表框List2中，程序运行界面如图b所示。
图b
请回答下列问题。
（1）若要在窗体载入后让窗体标题显示“排序改进算法”，则下列操作可行的是 （单选，填字母。）
A．直接将窗体属性栏中的“Text”属性值修改为“排序改进算法”
B．在程序的Form_Load()事件中写上代码 Form1.Caption =“排序改进算法”
C．在程序的Command1_Click()事件中写上代码Form1.Caption =“排序改进算法”
（2）请完成程序中的填空。
Const n = 10
Dim a(0 To 100) As Integer， b(0 To 100) As Integer， cnt(1 To 100) As Integer
Dim Ln As Integer， pos As Integer 'Ln表示b数组的长度
Function search(key As Integer)
Dim i As Integer
For i = 1 To Ln
If b(i) >= key Then Exit For
Next i
search = i
End Function
Private Sub Command1_Click()
Dim i As Integer， j As Integer
Ln = 0
For i = 1 To n
pos = 　 　
If b(pos) <> a(i) Then
Ln = Ln + 1
j = Ln
Do While j > pos
b(j) = b(j - 1)
　 　
j = j - 1
Loop
b(j) = a(i)
cnt(pos) = 1
Else
End If
Next i
For i = 1 To Ln
For j = 1 To cnt(i)
List2.AddItem Str(b(i))
Next j
Next i
End Sub
Private Sub Form_Load()
For i = 1 To n
a(i) = Rnd() * 10 + 1
List1.AddItem Str(a(i))
Next i
End Sub
（3）程序中加框处存在错误，请改正。
【答案】（1）B
（2）search(a(i))；cnt(j)=cnt(j-i)
（3）cnt(pos)=cnt(pos)+1
【知识点】排序算法及程序实现
【解析】【解答】（1）题干要求在窗体标题显示“排序改进算法”，故在程序的Form_Load()事件中写上代码 Form1.Caption =“排序改进算法”。故答案选B。
（2）第一空：search()函数是按升序寻找关键字key在数组b中的位置i，找到后返回位置i，此处通过for循环寻找数组a中每一个元素在数组b中的位置，找到后将其赋给变量pos。故答案为：search(a(i))。
第二空：此处while循环是实现移动数组b中的元素（当关键字比数组b中位置j的值小时，需要后移，即j-1处的值移到j处），故b(j) = b(j - 1)，cnt(j)=cnt(j-i)，同时j递减，在位置j处插入数据a(i)。故答案为：cnt(j)=cnt(j-i)。
（3）此处是执行if条件结构的else部分，即pos位置处出现了重复值，故cnt(pos)需要递增，故此处应改为cnt(pos)=cnt(pos)+1。
【分析】本题考查的是VB排序算法。
16．（2020高三上·衢州月考）在挖金矿小游戏中，玩家通过指令控制小人运动，小人按照一定的规则将地底的金矿全部收集完毕。现将地底的截面可用一个n*n的矩阵表示，其中第一行表示地面，不会出现金矿；第2行至第n行表示地底。每一行中黑色格子表示金矿，白色格子表示空地，其中小人在矩阵左上角第一行第一列的位置。
玩家通过4种指令控制小人运动：
· 左 X：小人向左移动X个格子
· 右 X：小人向右移动X个格子
· 下 X：小人向下移动X个格子
· 挖矿：收集小人所在格子的金矿
小人收集金矿需要遵循一定的规则：
①小人必须将当前行的金矿全部收集，才能去往下一行，即金矿需从上到下收集
②对于同一行的金矿，小人必须按照从左往右的顺序开始收集
现编写程序，以8*8的矩阵为例，在文本框Text1中输入金矿数量，点击按钮“开始”后，随机产生对应数量的金矿并借助图形控件输出（保证不会在同一个格子出现两个金矿），并且在列表框List1中按顺序输出指令，使小人按照规则得到所有金矿。如图a所示。请回答下列问题。
图a
（1）现有4*4的地底截面如图b所示，小人在左上角位置，请写出任意一种可使小人按规则获得所有金矿的指令（指令之间用逗号或空格隔开）　 　。
图b
（2）请完成程序中的填空。
Const n = 8 '程序以8*8的矩阵为例
Dim x(1 To n*n) As Integer, y(1 To n*n) As Integer '存储所有金矿的位置
Dim px As Integer, py As Integer '存储小人所在的位置
Dim i As Integer, j As Integer, m As Integer, tmp As Integer
Private Sub Command1_Click()
m = Val(Text1.Text)
Randomize
'随机产生m个金矿并通过图形控件显示在界面上，代码略
For i = 1 To m - 1
For j = 1 To m - i
'将所有金矿按照从上到下、从左到右的顺序排序，以符合题目描述的规则
If x(j) > x(j + 1) Or 　 　Then
tmp = x(j): x(j) = x(j + 1): x(j + 1) = tmp
tmp = y(j): y(j) = y(j + 1): y(j + 1) = tmp
End If
Next j
Next i
px = 1: py = 1
i = 1: j = 1
Do While j <= m
Do While x(j) = x(j + 1) And j <= m
j = j + 1
Loop
If y(i) < py Then
List1.AddItem "左" + Str(py - y(i))
ElseIf y(i) > py Then
List1.AddItem "右" + Str(y(i) - py)
End If
List1.AddItem "下" + Str　 　)
List1.AddItem "挖矿"
For k = i + 1 To j
List1.AddItem "右" + Str(y(k) - y(k - 1))
List1.AddItem "挖矿"
Next k
px = x(j)
　 　
j = j + 1
i = j
Loop
End Sub
【答案】（1）下1挖矿 下2挖矿 右3挖矿或下 1，挖矿，下 2，挖矿，右 3，挖矿
（2）x(j)= x(j + 1) And y(j)>y(j + 1)；x(j)-px；py=y(j)
【知识点】程序的调试及运行；分支结构语句及程序实现；循环结构语句及程序实现
【解析】【解答】（1）由图可知，可写指令：下1挖矿 下2挖矿 右3挖矿或下 1，挖矿，下 2，挖矿，右 3，挖矿。
（2）第一空：按照要求，将所有金矿按照从上到下、从左到右的顺序排序，以符合题目描述的规则，故当x(j)大于x(j+1)或当x(j)等于x(j+1)且y(j)大于y(j+1)时，交换x(j)与x(j+1)，y(j)与y(j+1)，故答案为：x(j)= x(j + 1) And y(j)>y(j + 1)。
第二空：移动顺序是在当前行移动，收集完再去下一行，下移的长度是x(j)-px（金矿的位置减去小人的x坐标），故答案为：x(j)-px。
第三空：此处在挖矿后，更新小人的位置（将当前金矿的位置赋给小人的位置），px = x(j)，py=y(j)，故答案为：py=y(j)。
【分析】本题考查的是VB程序的执行与调试。
1 / 1

展开更多......

收起↑