资源简介

浙江省瑞安市上海新纪元高级中学2019-2020学年高二下学期信息技术期末考试试卷
一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分)
1．（2020高二下·上海期末）关于信息和信息处理，下列描述错误的是（　　）
A．人的大脑是信息的载体
B．信息在传输过程中不会发生信息丢失
C．计算机处理信息的优势之一是计算速度快
D．计算机录音过程中涉及对声音信息的加工处理
【答案】B
【知识点】信息及其特征
2．（2020高二下·上海期末）关于信息的表达与交流，下列描述正确的是（　　）
A．在某购物网站按商品类别进行查询信息属于主题目录检索
B．网页中的超链接只能链接到网页，不能指向图片、文件等
C．SMTP 协议的功能是让收件人从邮件服务器中将邮件读到本地计算机
D．在浏览器中执行“另存为”操作保存网页内容的同时，也保存了该网页的URL
【答案】A
【知识点】电子邮件，电子公告板等信息交流方式；网络资源的类型、下载与保存；网络资源的检索；网页的交互设计
3．（2020高二下·上海期末）某学生选课系统采用数据库来管理相关信息，其数据库部分界面如图所示。下列说法正确的是（　　）
A．该数据库不能存储图像
B．当前数据表中可以有两条相同“学号”的记录
C．用户发出删除记录等操作指令，不需要数据库管理系统去实现
D．选课系统的各用户可以同时访问数据库，体现了数据库的共享性
【答案】D
【知识点】数据库、数据库系统及其特征；数据表、字段、记录的概念
4．（2020高二下·上海期末）关于信息编码，下列描述正确的是（　　）
A．GB2312汉字编码属于机内码
B．扫描条形码是信息的编码过程
C．可以使用十六进制数对信息进行编码
D．使用4位二进制数可以实现对某班40个学号进行编码
【答案】C
【知识点】信息的编码
5．（2020高二下·上海期末）使用Photoshop 软件制作“渔舟唱晚”作品，部分界面如图所示。下列说法正确的是（　　）
A．“古诗”图层可以直接设置“风”滤镜
B．可以在“小舟”图层用仿制图章工具进行仿制图像
C．交换“小舟”与“山脉”图层的顺序，不影响作品的呈现效果
D．将文档储存为 JPEG 格式文件，“白鹭”图层中的图像内容可见
【答案】C
【知识点】图片加工常用工具的使用；图层及图层的基本操作
6．（2020高二下·上海期末）用 GoldWave 软件制作一段音频，部分界面如图所示。若在当前状态下插入10秒静音，按原参数保存，则声音文件储容量约为（　　）
A． 6.73MB B．8.41MB C．16.82MB D．26.91MB
【答案】B
【知识点】声音、图像、视频编码
7．（2020高二下·上海期末）下列 VB表达式中，计算结果与其他不同的选项是（　　）
A．2 Mod 8 + 1 B．Len("2") + 1
C．Sqr(Abs(23-32)) D．27 Mod 8 \ 2
【答案】B
【知识点】运算符、基本运算与表达式
8．（2020高二下·上海期末）某算法的部分流程图如图所示。执行这部分流程，若输入n的值为501，则输出i的值为（　　）
A． 3 B． 4 C． 5 D． 60
【答案】A
【知识点】流程图识读
9．（2020高二下·上海期末）有如下 VB 程序段：
s = 0: k = 0
For i = 1 To 4
t = a(i)
a(i) = k + t
k = t
s = s + a(i)
Next i
Text1.Text = Str(s)
数组元素a(1)至a(4)的值依次为“1，3，2，0”，执行该程序段后，文本框Text1中显示的是（　　）
A．9 B．10 C．11 D．12
【答案】D
【知识点】常见数据类型、数组；循环结构语句及程序实现
10．（2020高二下·上海期末）已知一个含有 n 个不重复整数的数组 a，i 和 j 表示数组下标（iPrivate Sub Command1_Click()
Dim s As Integer, b As Integer
s = 0: b = a(1) + 1
For i = 2 To n
Next i
Label1.Caption = Str(s)
End Sub
Function max(x As Integer, y As Integer)
If x > y Then Else
End Function
方框中的代码由以下四部分组成:
①max = y ②max = x ③b = max(b, a(i) + i) ④s = max(s, a(i) - i + b)
代码顺序正确的是（　　）
A．④③①② B．③④②① C．③④①② D．④③②①
【答案】D
【知识点】常量、变量及变量的赋值
11．（2020高二下·上海期末）有如下 VB 程序段：
m = Int(Rnd * 4 + 2)
For i = 1 To 6 - m
For j = 1 To 6 - i
If a(j) - a(j + 1) < 0 Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t
End If
Next j
Next i
数组元素a(1)到 a(6)的值依次为“49，45，5，61，42，71”，执行该程序段后，a(1)～a(6)各元素值不可能的是（ ）
A． 61,49,71,45,42,5 B．49,45,61,42,71,5
C．49,61,45,71,42,5 D．71,61,49,45,42,5
【答案】D
【知识点】常见数据类型、数组；运算符、基本运算与表达式；分支结构语句及程序实现；循环结构语句及程序实现
12．（2020高二下·上海期末）有如下 VB 程序段：
Key = Val(Text1.Text)
i = 1: j = 10: c = 0
Do While i <= j
m = (i + j) \ 2
c = c + 1
If a(m) >= Key Then j = m – 1 Else i = m + 1
Loop
Text2.Text = Str(c) + Str(i) + Str(j) + Str(m)
数组元素a(1)至a(10)的值依次为“8，10，12，15，15，15，21，34，45，66”。在文本框Text1中输入数值15，执行该程序段后，文本框Text2中显示的内容是（ ）
A． 3 3 2 3 B． 4 4 3 4 C． 4 7 6 7 D． 3 4 3 3
【答案】B
【知识点】常见数据类型、数组；分支结构语句及程序实现；循环结构语句及程序实现
二、非选择题（本大题共4小题，4+8+7+7，共26分）
13．（2020高二下·上海期末）使用Excel软件处理浙江省行政区域相关数据，部分数据如图a所示。
请回答下列问题：
（1）区域J3:J13的数据是通过公式计算得到的：在J3单元格中输入公式　 　，再利用自动填充功能完成区域J4:J13的计算。（提示：COUNTIF 函数用于统计某个区域满足条件的单元格个数。例如：=COUNTIF(H3:H13,B3）表示在数据区域 H3:H13 中统计数值等于 B3 单元格值的个数。）
（2）对图a中的数据区域A2:F92按图b所示的条件进行排序(文本按字母排序)，结合“各地级市相关数据统计表”分析,则排序后湖州市面积最小的县级行政区的行号为　 　。
（3）县级行政区的代码前4位与该县级行政区所在地级市代码的前4位是相同的。现将图a中A1:F92的数据复制至新工作表中，若要筛选出衢州市各县级行政区域相关信息，下列筛选方式可行的是 (多选，填字母)
A．
B．
C．
D．
【答案】（1）=COUNTIF(B$3:B$92,H3)或=COUNTIF($B$3:$B$92,H3)或=COUNTIF(B$3:B$92,$H3)或=COUNTIF($B$3:$B$92,$H3)
（2）20
（3）A；B；D
【知识点】表格数据的基本操作；表格数据的处理与计算
14．（2020高二下·上海期末）用 Flash 软件打开制作“致敬逆行者.fla”文件，编辑界面如下图所示。
请回答下列问题:
（1）下学列属于创作需求分析的是　 　(多选，填字母:A .将作品定位为演示型/ B .设计作品的主要界面/ C .作品将以SWF格式在网络上发布/
D .确定制作该作品所需软件和硬件/E . 分析作品主网要面向的用户)。
（2）不改变动画帧数，若要使当前场景动画播放时长调整为5秒，则需设置Flash文档帧频为　 　fps。
（3）在当前状态下，下列说法不正确的是　 　（单选，填字母：A .库中至少有5个元件/B .可以将“音乐”图层移至“背景”图层下方/ C .可以将“人物”图层第1帧对象的Alpha值修改为 50%/ D .“文字”图层第1帧至第40帧的动画类型是逐帧动画）
（4）若要使“音乐”图层的声音与“人物”图层动画同时开始播放，并在该场景动画结束后声音继续播放，正确的操作是　 　。
（5）测试影片时，单击“进入”按钮，停止当前声音的播放，然后跳转到“战斗”场景第1帧继续播放，则该“进入”按钮的动作脚本是 on(press){　 　}。
【答案】（1）ACD
（2）8
（3）C
（4）将“音乐”图层第10帧移至第1帧，并将声音同步方式修改为事件或在音乐图层的第一帧执行“清除关键帧”命令，并将声音同步方式修改为事件
（5）stopAllSounds(); gotoAndPlay(“战斗”,1);或 stopAllSounds();play()
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；元件的类型与应用
15．（2020高二下·上海期末）IPV4点分十进制IP地址可转换为十进制数字形式。编写“模拟IP过滤器”程序，程序功能如下:程序运行时，在列表框List1中显示能通过过滤的IP区间（IP区间按起始端点升序排序），在文本框Text1中输入需要判断的IP地址，单击“验证”按钮Cmd1，若IP区间有重叠区间则作合并处理，并显示在列表框List2中，然后对输入的IP地址进行判断，判断结果显示在标签Label4中。程序运行界面如图所示：
（1）Cmd1对象 属于　 　类（单选，填字母 ：A . Form/ B . Label/ C . TextBox /mandButton）。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Dim a(1 To 100) As Integer, n As Integer
Private Sub Form_Load()
'本过程从数据库中读取n个IP地址区间数据，并依次存入数组a(1)、…、a(2*n)中
'对能通过过滤的IP区间按区间起始端点升序排序
'代码略
End Sub
Private Sub Cmd1_Click()
Dim ip As Integer, L As Integer, R As Integer
Dim i As Integer, pos As Integer, f As Boolean
ip = Val(Text1.Text)
L = a(1): R = a(2): i = 3: pos = 1 ‘合并重叠区间
Do While i <= 2 * n - 1
If 　 　Then
If a(i + 1) > R Then R = a(i + 1)
Else
a(2 * pos - 1) = L：a(2 * pos) = R
pos = pos + 1
L = a(i)
R = a(i + 1)
End If
　 　
Loop
a(2 * pos - 1) = L: a(2 * pos) = R '依次输出排序合并后的区间数据，代码略
If Then '判断请求的 IP 地址
Label4.Caption = "IP 需过滤"
Else
i = 1: f = False
Do While i <= pos And Not f
If 　 　 Then
i = i + 1
Else
Label4.Caption = "IP 不需过滤" f = True
End If
Loop
If f = False Then Label4.Caption = "IP 需过滤"
End If
End Sub
（3）程序中加框处代码有错，请改正。
【答案】（1）D
（2）a(i)<=R；i=i+2；Not(ip>=a(2*i-1) And ip<=a(2*i))或a(2 * i - 1) > ip Or a(2 * i) < ip
（3）ip < a(1) Or ip > a(2 * pos)
【知识点】类、对象、属性、方法、事件和事件处理的概念及应用；运算符、基本运算与表达式
16．（2020高二下·上海期末）某小卖部商品相关数据分别存放在相应的数据表中，如图a和图b所示。
编写“商品销售统计”程序功能如下：窗体加载时从数据库中读取商品的相关数据，对各商品类别总销量及名次进行统计，结果在列表框List1中显示；单击“查询”按钮Command1，按商品类别编号从小到大排列，同一类别商品按销量从大到小排序，在列表框List2中显示。程序运行界面如图c所示。
（1）阅读程序可知，gtype(b(3))的初始值为　 　。
（2）请在划线处填入合适的代码。
Dim a(1 To 2000) As Integer, b(1 To 2000) As Integer, s(1 To 2000) As Integer
Dim gid(1 To 100) As Integer, t(1 To 2000) As Integer
Dim c(1 To 2000) As String, gtype(1 To 100) As String
Dim ts(1 To 100) As Integer '数组 ts 存储每个类别商品总销量
Dim k(1 To 2000) As Integer '数组 k 存储每个类别商品总数
Dim m As Integer, n As Integer
Private Sub Form_Load()
'从数据库读取 m 条记录中类别编号、商品类别数据分别存储在数组 gid、gtype 中
'从数据库读取n 条记录中类别编号、商品名称、商品销量数据分别存储在数组 b、c、s中，代码略
For i = 1 To n '统计各类别商品总销量及商品总数
　 　
k(b(i)) = k(b(i)) + 1
Next i
For i = 1 To m '计算各类别商品总销量的名次
p = 0
For j = 1 To m
If ts(i) < ts(j) Then p = p + 1
mc(i) = p + 1
Next j
Next i
List1.AddItem "类别 销量 名次"
For i = 1 To m
List1.AddItem gtype(i) + " " + Str(ts(i)) + " " + Str(mc(i))
Next i
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, pos As Integer, tmp As Integer, p As Integer
p = 1
For i = 1 To m
a(i) = p
p = p + k(i)
Next i
For i = 1 To n
p = b(i)
t(a(p)) = i
a(p) = a(p) + 1
Next i
pos = 1
For i = 1 To m '对各类别商品按商品销量进行排序
For j = pos To pos + k(i) - 2
　 　
tmp =t(j): t(j) = t(p): t(p) = tmp
Next j
pos = pos + k(i)
Next i
List2.AddItem "类别 商品 商品销量"
For i = 1 To n
List2.AddItem 　 　 + " " + geshi(c(t(i))) + " " +Str(s(t(i)))
Next i
End Sub
Function f(head As Integer, tail As Integer) As Integer
Dim i As Integer, p As Integer
p = head - 1
For i = head To tail
If s(t(i)) > s(t(p)) Then p = i
Next i
f = p
End Function
Function geshi(s As String) As String '格式输出，代码略
End Function
【答案】（1）“饼干”
（2）ts(b(i)) = ts(b(i)) + s(i)；p = f(j + 1, pos + k(i) - 1)；gtype(b(t(i)))
【知识点】常见数据类型、数组；过程与自定义函数；排序算法及程序实现；循环结构语句及程序实现
1 / 1浙江省瑞安市上海新纪元高级中学2019-2020学年高二下学期信息技术期末考试试卷
一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分)
1．（2020高二下·上海期末）关于信息和信息处理，下列描述错误的是（　　）
A．人的大脑是信息的载体
B．信息在传输过程中不会发生信息丢失
C．计算机处理信息的优势之一是计算速度快
D．计算机录音过程中涉及对声音信息的加工处理
2．（2020高二下·上海期末）关于信息的表达与交流，下列描述正确的是（　　）
A．在某购物网站按商品类别进行查询信息属于主题目录检索
B．网页中的超链接只能链接到网页，不能指向图片、文件等
C．SMTP 协议的功能是让收件人从邮件服务器中将邮件读到本地计算机
D．在浏览器中执行“另存为”操作保存网页内容的同时，也保存了该网页的URL
3．（2020高二下·上海期末）某学生选课系统采用数据库来管理相关信息，其数据库部分界面如图所示。下列说法正确的是（　　）
A．该数据库不能存储图像
B．当前数据表中可以有两条相同“学号”的记录
C．用户发出删除记录等操作指令，不需要数据库管理系统去实现
D．选课系统的各用户可以同时访问数据库，体现了数据库的共享性
4．（2020高二下·上海期末）关于信息编码，下列描述正确的是（　　）
A．GB2312汉字编码属于机内码
B．扫描条形码是信息的编码过程
C．可以使用十六进制数对信息进行编码
D．使用4位二进制数可以实现对某班40个学号进行编码
5．（2020高二下·上海期末）使用Photoshop 软件制作“渔舟唱晚”作品，部分界面如图所示。下列说法正确的是（　　）
A．“古诗”图层可以直接设置“风”滤镜
B．可以在“小舟”图层用仿制图章工具进行仿制图像
C．交换“小舟”与“山脉”图层的顺序，不影响作品的呈现效果
D．将文档储存为 JPEG 格式文件，“白鹭”图层中的图像内容可见
6．（2020高二下·上海期末）用 GoldWave 软件制作一段音频，部分界面如图所示。若在当前状态下插入10秒静音，按原参数保存，则声音文件储容量约为（　　）
A． 6.73MB B．8.41MB C．16.82MB D．26.91MB
7．（2020高二下·上海期末）下列 VB表达式中，计算结果与其他不同的选项是（　　）
A．2 Mod 8 + 1 B．Len("2") + 1
C．Sqr(Abs(23-32)) D．27 Mod 8 \ 2
8．（2020高二下·上海期末）某算法的部分流程图如图所示。执行这部分流程，若输入n的值为501，则输出i的值为（　　）
A． 3 B． 4 C． 5 D． 60
9．（2020高二下·上海期末）有如下 VB 程序段：
s = 0: k = 0
For i = 1 To 4
t = a(i)
a(i) = k + t
k = t
s = s + a(i)
Next i
Text1.Text = Str(s)
数组元素a(1)至a(4)的值依次为“1，3，2，0”，执行该程序段后，文本框Text1中显示的是（　　）
A．9 B．10 C．11 D．12
10．（2020高二下·上海期末）已知一个含有 n 个不重复整数的数组 a，i 和 j 表示数组下标（iPrivate Sub Command1_Click()
Dim s As Integer, b As Integer
s = 0: b = a(1) + 1
For i = 2 To n
Next i
Label1.Caption = Str(s)
End Sub
Function max(x As Integer, y As Integer)
If x > y Then Else
End Function
方框中的代码由以下四部分组成:
①max = y ②max = x ③b = max(b, a(i) + i) ④s = max(s, a(i) - i + b)
代码顺序正确的是（　　）
A．④③①② B．③④②① C．③④①② D．④③②①
11．（2020高二下·上海期末）有如下 VB 程序段：
m = Int(Rnd * 4 + 2)
For i = 1 To 6 - m
For j = 1 To 6 - i
If a(j) - a(j + 1) < 0 Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t
End If
Next j
Next i
数组元素a(1)到 a(6)的值依次为“49，45，5，61，42，71”，执行该程序段后，a(1)～a(6)各元素值不可能的是（ ）
A． 61,49,71,45,42,5 B．49,45,61,42,71,5
C．49,61,45,71,42,5 D．71,61,49,45,42,5
12．（2020高二下·上海期末）有如下 VB 程序段：
Key = Val(Text1.Text)
i = 1: j = 10: c = 0
Do While i <= j
m = (i + j) \ 2
c = c + 1
If a(m) >= Key Then j = m – 1 Else i = m + 1
Loop
Text2.Text = Str(c) + Str(i) + Str(j) + Str(m)
数组元素a(1)至a(10)的值依次为“8，10，12，15，15，15，21，34，45，66”。在文本框Text1中输入数值15，执行该程序段后，文本框Text2中显示的内容是（ ）
A． 3 3 2 3 B． 4 4 3 4 C． 4 7 6 7 D． 3 4 3 3
二、非选择题（本大题共4小题，4+8+7+7，共26分）
13．（2020高二下·上海期末）使用Excel软件处理浙江省行政区域相关数据，部分数据如图a所示。
请回答下列问题：
（1）区域J3:J13的数据是通过公式计算得到的：在J3单元格中输入公式　 　，再利用自动填充功能完成区域J4:J13的计算。（提示：COUNTIF 函数用于统计某个区域满足条件的单元格个数。例如：=COUNTIF(H3:H13,B3）表示在数据区域 H3:H13 中统计数值等于 B3 单元格值的个数。）
（2）对图a中的数据区域A2:F92按图b所示的条件进行排序(文本按字母排序)，结合“各地级市相关数据统计表”分析,则排序后湖州市面积最小的县级行政区的行号为　 　。
（3）县级行政区的代码前4位与该县级行政区所在地级市代码的前4位是相同的。现将图a中A1:F92的数据复制至新工作表中，若要筛选出衢州市各县级行政区域相关信息，下列筛选方式可行的是 (多选，填字母)
A．
B．
C．
D．
14．（2020高二下·上海期末）用 Flash 软件打开制作“致敬逆行者.fla”文件，编辑界面如下图所示。
请回答下列问题:
（1）下学列属于创作需求分析的是　 　(多选，填字母:A .将作品定位为演示型/ B .设计作品的主要界面/ C .作品将以SWF格式在网络上发布/
D .确定制作该作品所需软件和硬件/E . 分析作品主网要面向的用户)。
（2）不改变动画帧数，若要使当前场景动画播放时长调整为5秒，则需设置Flash文档帧频为　 　fps。
（3）在当前状态下，下列说法不正确的是　 　（单选，填字母：A .库中至少有5个元件/B .可以将“音乐”图层移至“背景”图层下方/ C .可以将“人物”图层第1帧对象的Alpha值修改为 50%/ D .“文字”图层第1帧至第40帧的动画类型是逐帧动画）
（4）若要使“音乐”图层的声音与“人物”图层动画同时开始播放，并在该场景动画结束后声音继续播放，正确的操作是　 　。
（5）测试影片时，单击“进入”按钮，停止当前声音的播放，然后跳转到“战斗”场景第1帧继续播放，则该“进入”按钮的动作脚本是 on(press){　 　}。
15．（2020高二下·上海期末）IPV4点分十进制IP地址可转换为十进制数字形式。编写“模拟IP过滤器”程序，程序功能如下:程序运行时，在列表框List1中显示能通过过滤的IP区间（IP区间按起始端点升序排序），在文本框Text1中输入需要判断的IP地址，单击“验证”按钮Cmd1，若IP区间有重叠区间则作合并处理，并显示在列表框List2中，然后对输入的IP地址进行判断，判断结果显示在标签Label4中。程序运行界面如图所示：
（1）Cmd1对象 属于　 　类（单选，填字母 ：A . Form/ B . Label/ C . TextBox /mandButton）。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Dim a(1 To 100) As Integer, n As Integer
Private Sub Form_Load()
'本过程从数据库中读取n个IP地址区间数据，并依次存入数组a(1)、…、a(2*n)中
'对能通过过滤的IP区间按区间起始端点升序排序
'代码略
End Sub
Private Sub Cmd1_Click()
Dim ip As Integer, L As Integer, R As Integer
Dim i As Integer, pos As Integer, f As Boolean
ip = Val(Text1.Text)
L = a(1): R = a(2): i = 3: pos = 1 ‘合并重叠区间
Do While i <= 2 * n - 1
If 　 　Then
If a(i + 1) > R Then R = a(i + 1)
Else
a(2 * pos - 1) = L：a(2 * pos) = R
pos = pos + 1
L = a(i)
R = a(i + 1)
End If
　 　
Loop
a(2 * pos - 1) = L: a(2 * pos) = R '依次输出排序合并后的区间数据，代码略
If Then '判断请求的 IP 地址
Label4.Caption = "IP 需过滤"
Else
i = 1: f = False
Do While i <= pos And Not f
If 　 　 Then
i = i + 1
Else
Label4.Caption = "IP 不需过滤" f = True
End If
Loop
If f = False Then Label4.Caption = "IP 需过滤"
End If
End Sub
（3）程序中加框处代码有错，请改正。
16．（2020高二下·上海期末）某小卖部商品相关数据分别存放在相应的数据表中，如图a和图b所示。
编写“商品销售统计”程序功能如下：窗体加载时从数据库中读取商品的相关数据，对各商品类别总销量及名次进行统计，结果在列表框List1中显示；单击“查询”按钮Command1，按商品类别编号从小到大排列，同一类别商品按销量从大到小排序，在列表框List2中显示。程序运行界面如图c所示。
（1）阅读程序可知，gtype(b(3))的初始值为　 　。
（2）请在划线处填入合适的代码。
Dim a(1 To 2000) As Integer, b(1 To 2000) As Integer, s(1 To 2000) As Integer
Dim gid(1 To 100) As Integer, t(1 To 2000) As Integer
Dim c(1 To 2000) As String, gtype(1 To 100) As String
Dim ts(1 To 100) As Integer '数组 ts 存储每个类别商品总销量
Dim k(1 To 2000) As Integer '数组 k 存储每个类别商品总数
Dim m As Integer, n As Integer
Private Sub Form_Load()
'从数据库读取 m 条记录中类别编号、商品类别数据分别存储在数组 gid、gtype 中
'从数据库读取n 条记录中类别编号、商品名称、商品销量数据分别存储在数组 b、c、s中，代码略
For i = 1 To n '统计各类别商品总销量及商品总数
　 　
k(b(i)) = k(b(i)) + 1
Next i
For i = 1 To m '计算各类别商品总销量的名次
p = 0
For j = 1 To m
If ts(i) < ts(j) Then p = p + 1
mc(i) = p + 1
Next j
Next i
List1.AddItem "类别 销量 名次"
For i = 1 To m
List1.AddItem gtype(i) + " " + Str(ts(i)) + " " + Str(mc(i))
Next i
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, pos As Integer, tmp As Integer, p As Integer
p = 1
For i = 1 To m
a(i) = p
p = p + k(i)
Next i
For i = 1 To n
p = b(i)
t(a(p)) = i
a(p) = a(p) + 1
Next i
pos = 1
For i = 1 To m '对各类别商品按商品销量进行排序
For j = pos To pos + k(i) - 2
　 　
tmp =t(j): t(j) = t(p): t(p) = tmp
Next j
pos = pos + k(i)
Next i
List2.AddItem "类别 商品 商品销量"
For i = 1 To n
List2.AddItem 　 　 + " " + geshi(c(t(i))) + " " +Str(s(t(i)))
Next i
End Sub
Function f(head As Integer, tail As Integer) As Integer
Dim i As Integer, p As Integer
p = head - 1
For i = head To tail
If s(t(i)) > s(t(p)) Then p = i
Next i
f = p
End Function
Function geshi(s As String) As String '格式输出，代码略
End Function
答案解析部分
1．【答案】B
【知识点】信息及其特征
2．【答案】A
【知识点】电子邮件，电子公告板等信息交流方式；网络资源的类型、下载与保存；网络资源的检索；网页的交互设计
3．【答案】D
【知识点】数据库、数据库系统及其特征；数据表、字段、记录的概念
4．【答案】C
【知识点】信息的编码
5．【答案】C
【知识点】图片加工常用工具的使用；图层及图层的基本操作
6．【答案】B
【知识点】声音、图像、视频编码
7．【答案】B
【知识点】运算符、基本运算与表达式
8．【答案】A
【知识点】流程图识读
9．【答案】D
【知识点】常见数据类型、数组；循环结构语句及程序实现
10．【答案】D
【知识点】常量、变量及变量的赋值
11．【答案】D
【知识点】常见数据类型、数组；运算符、基本运算与表达式；分支结构语句及程序实现；循环结构语句及程序实现
12．【答案】B
【知识点】常见数据类型、数组；分支结构语句及程序实现；循环结构语句及程序实现
13．【答案】（1）=COUNTIF(B$3:B$92,H3)或=COUNTIF($B$3:$B$92,H3)或=COUNTIF(B$3:B$92,$H3)或=COUNTIF($B$3:$B$92,$H3)
（2）20
（3）A；B；D
【知识点】表格数据的基本操作；表格数据的处理与计算
14．【答案】（1）ACD
（2）8
（3）C
（4）将“音乐”图层第10帧移至第1帧，并将声音同步方式修改为事件或在音乐图层的第一帧执行“清除关键帧”命令，并将声音同步方式修改为事件
（5）stopAllSounds(); gotoAndPlay(“战斗”,1);或 stopAllSounds();play()
【知识点】多媒体作品的规划和设计；时间轴、帧、图层、库的概念及基本操作；元件的类型与应用
15．【答案】（1）D
（2）a(i)<=R；i=i+2；Not(ip>=a(2*i-1) And ip<=a(2*i))或a(2 * i - 1) > ip Or a(2 * i) < ip
（3）ip < a(1) Or ip > a(2 * pos)
【知识点】类、对象、属性、方法、事件和事件处理的概念及应用；运算符、基本运算与表达式
16．【答案】（1）“饼干”
（2）ts(b(i)) = ts(b(i)) + s(i)；p = f(j + 1, pos + k(i) - 1)；gtype(b(t(i)))
【知识点】常见数据类型、数组；过程与自定义函数；排序算法及程序实现；循环结构语句及程序实现
1 / 1

展开更多......

收起↑