2021年浙江卷技术高考真题

下列有关信息与信息技术的说法，正确的是（       ）

A．5G技术的出现使信息可以脱离载体传播

B．计算机处理信息通过执行程序完成的

C．智能处理得到的信息都是真实、可信的

D．当今社会信息时时处处都有，因而不再是人类的重要资源

下列有关网页与浏览器的说法，正确的是（       ）

A．HTTP协议用于浏览器与Web服务器之间的信息传输

B．收藏夹中的网址可以重命名，但不能被删除

C．在IE浏览器中，保存一个网页不可能得到多个文件

D．使用不同的搜索引擎搜索同一关键词，搜索的结果是相同的

使用Access软件编辑某班级图书管理数据库，该数据库当前仅包含“班级藏书”一个数据表，部分界面如图所示。

下列说法正确的是（       ）

A．该数据库中不可以创建一个表名为“借阅人”的数据表

B．“收藏日期”字段的数据类型是“日期/时间”

C．可以将“班级藏书”数据表导出为Excel文件

D．若添加一条新记录，则该记录中“书籍编号”字段的值为2

下列有关信息编码的说法，正确的是（       ）

A．十六进制数82H与十进制数82的值相等

B．根据GB2312-80标准，“信息”两字的内码共占2个字节

C．已知大写字母“X”的ASCII码值为58H，则大写字母“Z”的ASCII码值是60H

D．某7位二进制数的最高位为1，将其转换为十进制数后的值大于等于64

用Photoshop软件制作“春来了”作品，部分编辑界面如图所示。下列说法错误的是（       ）

A．“背景”图层的不透明度不可以更改为50%

B．“花朵”图层的名称可更改为“郁金香”

C．“来了”图层中的文字可用橡皮擦工具直接擦除

D．对“蝴蝶”图层执行“复制图层”操作，可产生一个“蝴蝶副本”图层

一幅未经压缩的2048×1536像素、24位色BMP图像，要将其存储容量减少到约1.5MB，在不改变其他参数的前提下，可调整图像大小、颜色分别为（       ）

A．1024×768像素、16色	B．1024×768像素、16位色
C．512×384像素、256色	D．512×384像素、24位色

VB表达式-3^2+14\4*3的值是（       ）

A．-8

B．0

C．10

D．8

某算法的部分流程图如图所示，执行这部分流程，若输入n的值为20，则输出a，b的值分别是（       ）

A．12，10

B．10，9

C．9，15

D．9，10

有百位和十位未知的5位整数“22**6，能被37或67整除。以下VB程序段的功能是：在满足条件的所有数中，将最大一个5位数的百位和十位依次显示在文本框Text1中。
i=100：flag=False
Do While i>0 And Not flagLoop
Text1. Text = Str（i\10）+Str（i Mod 10）
方框中的代码由以下三部分组成：
①j=22006+i*10       ②i=i-1   ③If（j Mod 37）*（J Mod 67）=0 Then flag = True
下列选项中，代码顺序正确的是（       ）

A．①②③

B．①③②

C．②①③

D．②③①

某对分查找算法的VB程序段如下：
i=1：j=30
m=（i+j）\2
Do While i < = j And key < > a（m）
       If key >a（m） Then i = m+1 Else j = m-1
       m=（i+j）\2               ①
Loop
数组元素a（1）到a（30）各不相同且按升序排列，若查找键key与a（9）相等，执行该程序段，①处语句的执行次数是（       ）

A．2

B．3

C．4

D．5

有如下VB程序段：
a（1）="ABC"：a（2）="DEF"：a（3）="GHI"
s1="31，12，23，33"：s2=" "
For i = 1 To Len（s1）

ch = Mid（s1，i，1）

If ch <> "，" Then

               i=i+1

   p=Val（Mid（s1，i，1））

   s2=s2+Mid（a（p），Val（ch），1）

End If

Next i
执行该程序段后，变量s2的值是（       ）

A．“CDHI”

B．“GBFI”

C．“CDH”

D．“GBF”

如下VB程序段实现对数组元素a（1）到a（10）从小到大排序。
i=1
Do While i<10

k=i：i=10

For j=10 To k + 1 Step -1

If a（j）<a（j-1） Then

       t=a（j）：a（j）=a（j-1）：a（j-1）=1

①

End If
Next j
Loop
则代码中①处的语句可为（       ）

A．i=i+1

B．i=j+1

C．i=k-1

D．i=j

收集某中学两个班级体质健康测试数据，并对部分项目用Excel软件进行数据处理，如图a所示。

请回答下列问题：
（1）区域G3：G82的数据是通过公式计算得到的，在G3单元格中输入公式________，再使用自动填充功能完成区域G4：G82的计算。（提示：体重指数=体重/身高²，单位：千克/米²）
（2）对区域A2：G82进行相关数据分析，下列说法正确的是_______（多选，填字母）。
A．更新C列身高数据，G列体重指数的值会随之改变
B．为了将女生身高最高的数据显示在当前工作表第3行，可选择身高为主要关键字、性别为次要关键字均按降序排序
C．为了显示男生1000/800米得分大于85的数据，可先对“性别”进行筛选，选择的值为“男”，再对“1000/800米得分”进行筛选，条件为大于85
D．为了显示女生肺活量得分最高的3位学生数据，可先对“性别”进行筛选，选择的值为“女”，再对“肺活量得分”进行筛选，选择“10个最大的值”并显示最大的3项
（3）对图a中的数据进行相关统计，结果放在新工作表中，如图b所示。根据图b中的数据制作的图表如图c所示，创建该图表的数据区域是________。

使用Flash软件创作“绿水青山”多媒体作品，部分编辑界面如图所示。
请回答下列问题：
（1）在创作之前进行了作品设计，下列说法正确的是_________（多选，填字母）。
A．考虑作品创作及运行需要的硬件和软件，属于作品的应用需求分析
B．考虑作品的用户情况和作品效益，属于作品的创作需求分析
C．将作品划分为片头，主交互界面、片尾等组成部分，属于系统结构设计
D．描述作品每个场景的展示内容及呈现方式，属于制订脚本大纲
E．制订处理各种多媒体素材的方案，属于媒体元素分解
（2）测试影片时，动画播放到当前场景第60帧自动停止，则“按钮”图层第60帧的动作脚本是_______（单选，填字母：A．stop（60）；/B．stop（）；），单击第60帧中的“重播”按钮实现从该帧跳转到当前场景第1帧并播放，则该按钮实例上添加的动作脚本是on（release）_________（单选，填字母：A．play（）；/B．gotoAndPlay（1）；）。
（3）“文字”图层第15帧中仅有的对象云朵为形状，该帧已设置形状补间。测试场景时，第15帧到第30帧没有实现从云朵渐变为“绿水青山”的形状补间效果，原因是_____。
（4）“小船”图层中小船都是“船”元件的实例。为了使小船在测试场景时从第41帧到第60帧在舞台上消失，其他动画效果保持不变，下列操作方法可行的是______（多选，填字母）。
A．将该图层移动到“背景”图层下方
B．选中该图层第41帧到第60帧执行“删除帧”操作
C．选中该图层第41帧执行“清除帧”操作
D．选中该图层第41帧执行“插入空白关键帧”操作
E．选中该图层第41帧执行“插入关他帧”操作，并将该帧中小船实例的Alpha值设为0%

根据某场馆一天中每位参观者的进馆和出馆时间，可统计该场馆当天人流量的分布情况。每个人进、出馆的时间用一个长度为11的字符串表示，例如“08：05-08：45”表示进馆时间为8点5分，出馆时间为8点45分。现要求统计当天馆内人数超过指定人数的总时长。
根据上述要求编写VB程序，功能如下：读取n个人进，出馆的时间，显示在列表框List1中。程序运行时，在文本框Text1中输入指定人数，单击“统计”按钮Command1，在标签Label1中显示馆内人数超过指定人数的总时长。程序运行界面如图所示。

（1）在VB表达式Va1（Text1.Text）中，Va1、Text1、Text依次表示______（单选，填字母：A．方法名、属性名、事件名/B．函数名、对象名、方法名/C．函数名、对象名、属性名）。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
（3）程序中加框处代码有错，请改正。______
Const n = 800

Dim d（1 To n）As String，a（1 To 2 * n）As String

Private Sub Form_Load（）

’读取n个人进、出馆的时间，存入数组d并显示在列表框List1中，代码略

End Sub

Private Sub Command 1_ Cliek（）

Dim i As Integer，j As Integer，k As Integer，sp As Integer

Dim i As Integer，cnt As Integer，mts As Integer，sum As Integer

Dim s As String

’提取每个人的进，出馆时间，分别加上IN、OUT标记后存入数组a

For i = l To n

a（i）=Mid（d（i），1，5）+"IN"

= Mid（d（i），7，5）+"OUT"

Next i
For i = 1 To 2 * n-1   对数组元素a（1）到a（2*n）从小到大排序

__

For i = i To 2 * n-1

If a（j） < a（k） Then k = j

Next j

s = a（i）：a（i） = a（k）：a（k）=s

Next i

sp =Val（Text1，Text）

t=-1：cnt=0：sum=0

For i = 1 To 2 * n

mts=Val（Mid（a（i），1，2））*60+Val（Mid（a（i），4，2））

If Mid（a（i），6，2）=“IN” Then cnt = cnt + 1 Else __

If cnt > sp Then

If t = -1 Then t = mts

Elself t > -1 Then

__

t=-1

End If

Next i

Label1.Caption = "超过指定人数的总时长："+Str（sum）+"分钟"
End Sub

有n个小组（编号1至n），每个小组有m个成员，每个成员都有一个大于等于0的得分。现要求按下列规则计算每个小组的成绩，并找出成绩最高的小组。
小组成绩的计算规则是：若小组成员中得分最高的前k人得分都不低于k，且其他成员得分都不超过k，则该小组成绩为k。例如，第1小组共有8个成员，得分依次为“5，2，7，11，8，6，5，1”，由此可知最高的前5人得分为“11，8，7，6，5”，其他3人得分为“5，2，1”，因此该小组成绩为5。

按上述要求，编写VB程序，功能如下：在列表框List1中显示各小组每个成员的得分，单击“计算”按钮Command1，在列表框List2中显示成绩最高的小组编号及成绩（如果有多个小组并列最高，则全部显示）。
（l）若第2小组各成员得分依次为“0，4，12，l，5，9，3，9”，则该小组的成绩是_______。
（2）请在划线处填入合适的代码。
Const n = 6
Const m = 8
Dim a（n * m）As Integer
Dim c（m）As Integer，ans（n）As Integer
Private Sulb Form_Load（）
’读取n个小组每个成员的得分，按组别从小到大依次存入数组a，并显示在List1中
’n（l）到a（m）存储第1小组m个成员的得分
’a（m+1）到a（2*m）存储第2小组m个成员的得分
’以此类推，代码略
End Sub
Privute Sub Cummand 1_Click（）

Dim i As Integer，p As Integer，g As Integer，maxg As Integer

maxg = -1

For i = l To n

g = GroupScore（i）

If g > maxg Then

maxg = g:p=l

__

Elself g = maxg Then
p=p+1
ans（p）=i
End If
Next i

For i = l To p

List2. Addltcm“第”+Str（ans（i））+“组，成绩：”+Str（maxg）

Next i

End Sulb
函数返回第w小组的成绩
Function Group Scone（w As Integer）As Integer

Dim i As Integer，k As Inteser

For i = 0 To m

e（i）=0

Next i

For i=（w-l）*m+l To w *m

k=a（i）

If k > m Then __

e（k）=e（k）+1

Nexl i

k=m

Do White e（k）< k And k>0

k=k-1

__

Loop
GroupScore=k
End Fuinction