浙江省金华市义乌市2021届高三信息技术适应性考试试卷
试卷更新日期：2021-09-27 类型：高考模拟
一、选择题
-
1. 下列关于信息与信息的加工描述正确的是（ ）A、计算机的运算速度只与硬件的性能有关。 B、计算机信息加工的本质是通过计算完成的。 C、使用Ultra Edit软件查看到某字符的内码是“D5 BD”，说明该字符在计算机内是用十六进制编码的。 D、随着科技的发展，计算机已经可以替代人自行做出所有的决策。2. 下列有关浏览器与网页的说法，正确的是（ ）A、收发电子邮件时收件人地址必须与发件人地址不同。 B、使用IE浏览器登录网站时，浏览器会自动记录用户的账号和密码。 C、以“网页，全部（*htm;*html)”格式保存网页，不一定能把网页中的全部内容保存下来。 D、使用记事本打开某网页文件就可以看到这个精美的网页。3. 使用ACCESS设计了一个“学生表”，用于存储如下图所示的数据：
下列关于“学生表”描述正确的是（ ）
A、“班级”字段的数据类型可以为“数字”。 B、“学籍辅号”字段的数据类型可以为“自动编号”。 C、若要增加一位“01”班学生的信息，可以在“学生表”的第3行位置插入一行记录。 D、“学生表”的字段顺序可以与图中数据的列顺序不一致。4. 下列关于信息编码的描述，正确的是（ ）A、JPEG是常用的静态图像压缩标准。 B、若十进制数a转换为二进制后末尾为0，则a/2转换为二进制后末尾也为0。 C、字符“A”的ASCII码值为41H，则“J”的ASCII码值为50H。 D、一幅16色的图片，每个像素点占用2个字节。5. 使用Photoshop软件制作“商贸义乌”作品，部分界面如图所示：
下列说法正确的是（ ）
A、可用“文字工具”修改“奇迹”两字的字号大小。 B、当前状态下，不能移动文字“义乌-伦敦”的位置。 C、将“义乌-伦敦”的图层样式拷贝给“中欧班列”后，“中欧班列”图层会有4个图层样式。 D、“备用背景”图层的内容不可见的原因，是该图层的不透明度为0%。6. 班里计划组织演唱比赛，小李打算帮大家录视频，录制的视频是未经压缩的1920*1080像素、256色图像、帧频为25，每位同学的表演时间为不超过5分钟，有15位同学参赛，小李至少需要准备多大的存储卡来存储演唱视频（ ）A、256GB B、128GB C、64GB D、32GB7. 下列VB表达式的值一定为2021的是（ ）A、Len("2020") + 1 B、Abs(Int(-2020.6)) C、Val("2020"+"1") D、Int(Rnd()*2022)8. 某算法的部分流程图如图所示。执行这部分流程，若输入s的值为“yummy”，则输出的ch、t值分别为（ ）
A、"y",1 B、"m",1 C、"y",5 D、"m",49. 在字符串s中查找是否存在字符子串s1，若有则返回第一个s1的起始位置，若没有则返回-1，实现该功能的VB程序段如下：⑴ : i = 1
n = Len(s): t = Len(s1)
Do While i < n - t And p = -1
If ⑵ Then p = i
⑶
Loop
Label1.Caption = p
代码中划线部分由下列代码组成：
①p=1
②s1 = Mid(s, i, t)
③p=-1
④s1 = Mid(s, i, 1)
⑤i = i + 1
⑥i = i + t
下列选项中，代码顺序正确的是（ ）
A、③②⑥ B、①④⑥ C、③②⑤ D、③④⑤10. 有如下VB程序段：For p = 11 To 12
Do While p > 1 And a(p) > a(p \ 2)
tmp = a(p): a(p) = a(p \ 2): a(p \ 2) = tmp
p = p \ 2
Loop
Next p
若a(1)～a(12)中的元素依次为“25，14，19，5，12，17，8，1，3，10，20，30”执行该程序段后，变量a(1)、a(2)和a(3)的值依次是（ ）
A、1 3 5 B、10 20 30 C、20 25 30 D、30 20 2511. 有数据序列为“2，6，8，3，5，9，7”，经过一轮冒泡排序后的结果是“2，3，6，8，5，7，9”，那么还需要（ ）轮冒泡排序后，数据才能完全有序。A、2 B、3 C、4 D、512. 有如下VB程序段：key = Val(Text1.Text): cnt=10
For i = 1 To cnt - 1
n = key - a(i)
L = i + 1: R = cnt
Do While L <= R
m = (L + R) \ 2
If a(m) = n Then Exit Do
If a(m) > n Then R = m - 1 Else L = m + 1
Loop
If L <= R Then Text2.Text = Str(key - a(m)) + "," + Str(a(m))
Next i
在数组a(1)～a(10)中存储的数据依次为“1，4，9，16，25，36，49，64，81，100”，在Text1中输入一个不大于200的数，执行该程序后，Text2中显示的内容可能是（ ）
A、1，99 B、36，64 C、81，25 D、100，100二、操作题
-
13. 小张收集了2020年浙江省内本科院校录取情况的相关数据，并用EXCEL表进行处理，如图a所示：
图a
请回答下列问题：
(1)、图a中I3：I11区域是用COUNTIF函数计算得到的，选择I3单元格输入公式后利用自动填充功能完成其他单元格的计算。观察上图，可知I3单元格中的公式为(COUNTIF函数的作用是计算某个区域中满足给定条件的单元格个数，如COUNTIF（D3:D61,D3）的作用是计算区域D3:D61中内容为“杭州市”的单元格个数)(2)、要使相同城市按照高校平均分有序排列，则排序时主、次关键字分别为、。(3)、选择图a数据区域A2：A61，F2：F61，创建了一张柱形图，为了更直观的观察杭州市录取平均分最高3所院校的柱形对比，可以对A2：F61区域进行操作，使柱形图更新为图b。①筛选出城市为“杭州市”的数据；②以城市为关键字，按笔画进行升序排序；③对“高校平均分”列设置“最大3项”的筛选；④以高校平均分为关键字进行降序排序；⑤隐藏第三所之后的所有院校。
图b
14. 使用flash软件打开“我的庄园.fla”文件，编辑界面如图a所示：
图a
请回答下列问题:
(1)、在制作作品前，小王进行了相应的需求分析，下列属于创作需求分析的是（A .该作品准备面向10岁以下的小朋友 B .该作品的使用价值如何 C .该作品的发布方式的选择 D .该作品选择的结构类型为游戏型 E.作品的背景音乐要悦耳，动画色彩和谐）(2)、“哈利波特”图层第1帧的属性如图b所示，则该图层的补间类型是（A .形状补间 / B .动画补间 / C .逐帧动画），若在第30帧插入关键帧，是否影响动画效果（A .是/ B .否）。
图b
(3)、若要实现“发芽”图层动画结束1秒后，“花朵”图层动画才开始，则对“发芽”图层正确的操作是：。(4)、若要实现该场景动画结束时，跳转到该场景的第1帧停止播放，则可行的操作是：。15. 在一条宽度度为L的直线小河中，一只青蛙想沿着直线从河的左侧跳到右侧。小河中有n片位置互不相同的荷叶，青蛙必须跳到荷叶上过河，否则会掉入水中。开始时青蛙站在河的左侧（坐标为0)，接着不停地向右侧跳跃，每次跳跃的距离不超过W，当青蛙跳到或跳过河的右侧(坐标为L)时，青蛙完成过河。例如当L=20,n=4,W=5，开始时4片荷叶的坐标为3，9，11，17，则至少需要增加2片荷叶，即在坐标8和16分别增加一个荷叶，得到过河的可行方案是0→3→8→9→11→16→17→20。
图a
图b
编写程序找出青蛙成功过河至少需要增加的荷叶数，界面如图b。请回答以下问题：
(1)、 若要将列表框List1顶端与窗体顶端的距离设置为100，能实现该功能的语句是(A . List1.Height = 100 / B . List1.Top = 100 / C . List1.Width = 100）。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Private Sub Form_Load()
'读取荷叶的位置，并保存到数组a中
'荷叶的数量保存在n中
'荷叶坐标和数量分别显示在list1和Text2中
End Sub
Private Sub Command1_Click()
Dim a(0 To 100) As Integer
Dim n As Integer, L As Integer, W As Integer, tot As Integer
Dim i As Integer, j As Integer, p As Integer, d As Integer
L = Val(Text1.Text) : n = Val(Text2.Text) : W = Val(Text3.Text)
a(0) = 0 : a(n + 1) =
For i = 1 To n - 1
k = i
For j = i + 1 To n
If a(k) > a(j) Then
Next j
If k <> i Then
tmp = a(k): a(k) = a(i): a(i) = tmp
End If
Next i
For i = 1 To n
List1.AddItem a(i)
Next i
p = 1: d = 0
Do While d < L
If p <= n + 1 And Then
d = a(p)
p = p + 1
Else
tot = tot + 1
End If
Loop
Label4.Caption = "至少需要增加的荷叶数为：" + Str(tot)
End Sub
(3)、程序中加框处代码有错，请改正。16. 一张骨牌由上下两行共四个格子构成，每个格子有一个1到6之间的数字。现在一共有5张骨牌，从左到右排成一排，定义每张骨牌的差值为：骨牌第一行的数字和减去第二行的数字和；5张骨牌的差值为：每张骨牌的差值和的绝对值。如图a中，5张骨牌的差值为：|(3+3-4-4)+(6+3-2-5)+(2+3-4-5)+(1+5-3-3)+(1+1-1-1)|=4。
每张骨牌都可以顺时针旋转90度，效果如图b所示。现在最多可以选择其中一张骨牌进行旋转，使得旋转后的骨牌差值变小。求一种旋转方案，并输出骨牌差值的最小值。
图a
图b
编写VB程序，实现上述功能。运行程序，在文本框Text1中依次输入5张骨牌上的数字，单击“计算”按钮Command1，在文本框Text2、Text3、Text4中输出结果。程序运行界面如图b所示。
(1)、若图a中第1张骨牌的数字修改为，1、2、6、6，则骨牌差值的最小值为。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Dim a(1 To 20) As Integer ‘依次存储5张骨牌上的数字
Dim d(1 To 5) As Integer ‘依次存储5张骨牌，上下两行的差值
Const n = 5
Private Sub Form_Load()
'从文本框Text1读取5张骨牌上的数字，依次存入数组a
'a(1)～a(4)依次存储第一张骨牌从左到右从上到下四个数字
'a(5)到a(20)依次类推
'代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, up As Integer, down As Integer, t As Integer, k As Integer
Dim id As Integer, times As Integer, x As Integer, ans As Integer
For i = 1 To n
up = a(4 * i - 3) + a(4 * i - 2)
down = a(4 * i - 1) + a(4 * i)
d(i) = up - down
t = t + d(i)
Next i
id = 0 : times = 0
ans =
If ans <> 0 Then
k = 1
Do While k <= n
For x = 1 To 3
temp =
If temp < ans Then
ans = temp
id = k
End If
If temp = 0 Then Exit Do
Next x
k = k + 1
Loop
End If
Text2.Text = CStr(id)
Text3.Text = CStr(times)
Text4.Text = CStr(ans)
End Sub
Function turn(ByVal k As Integer, ByVal x As Integer) As Integer
‘求将第k张骨牌，顺时针旋转x次后，上下两行的差值，代码略
End Function