浙江省2021届高三上学期信息技术9月百校联考试卷
试卷更新日期：2021-06-15 类型：月考试卷
一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分)
-
1. 下列有关信息与信息处理的说法，不正确的是（ ）A、“有一千个读者就有一千个哈姆雷特”，说明了信息可以被加工处理 B、扫描商品条码获取商品信息，说明信息可以脱离载体而存在 C、二维码过一段时间会失效，说明信息具有时效性 D、刷脸支付属于人工智能应用2. 下列有关网页与浏览器的说法，正确的是（ ）A、在E浏览器中，以“网页，全部(*,Htm,*.html)”类型保存网页，可以同时保存视频 B、用HTTP语言可以描述网页中的文本、图像和超链接等元素 C、浏览器的“收藏夹”中保存了所收藏网页的URL D、访问相同的网址，得到的网页内容一定相同3. 使用Access软件设计一个数据表，存储如图所示的文章记录数据。
文章ID
文章标题
文章内容
发布时间
审核
1
扬帆起航逐梦高考
(略)
2020- 07-31
待审核
2
慧心尔雅待展芳华
(略)
2020- 08-01
通过
3
选择自己适合的路
(略)
2020-08-02
未通过
……
……
……
……
……
注：因篇幅因素，表中省略了文章内容，该字段允许存储学生日常习作(5000字以内)。
下列表格设计合理的是（ ）
A、
B、
C、
D、
4. 下列关于数制的说法，正确的是（ ）A、二进制数1010011转换为十六进制数是A3 B、二进制数110中的末位数码0对应的权值是0 C、ASCII码由128个代码组成，码值范围为1~128 D、若二进制数1101去掉末位数码1，则新数是原数的1\25. 用Photoshop软件制作“绍兴旅游”作品，如图所示，下列说法正确的是（ ）
A、“如画绍兴"图层设置了滤镜效果 B、调换“如画绍兴”和“人文景观"图层的次序，会影响图像效果 C、“如画绍兴”图层创建了变形文字 D、选中“绍”字，执行修改字号命令仅将“绍”字变大6. 一个未经压缩的音频文件，相关参数及选取状态如图所示。
则该文件执行裁剪命令后，该音频文件的存储容量约为（ ）
A、258KB B、602KB C、861KB D、881KB7. x的范围为(0 255)，下列选项中，与语句"n=x\128"功能相同的是（ ）A、n=0 If x> 128 Then n= 1 B、n=0 If x<128 Then n=1 C、n= 1 If x<128 Then n=0 D、n=1 If x>128 Then n=08. 某算法的部分流程图如图所示，执行这部分流程，若输人n值为35，k值为3，则输出c的值为（ ）
A、35 B、62 C、90 D、939. 有如下VB程序段：Dims As String, c As String, st As String
Dim n As Integer, i As Integer
s ="20zj20sx7"：n=0：st=""
For i=1 To Len(s)
c=Mid(s，i，1)
If c>= "a" And c<= "z" Then
st=Chr(Asc("a") *2+25-Asc(c))+st
Else
n=n*10+ Val(c)
End If
Next i
st =st+str(n)
执行该程序段后，变量st的值是（ ）
A、chqa 20207 B、cgpz 47 C、zpgc 20207 D、zjsx 4710. 在字符串s中找连续最长不下降数字字符串长度max，如字符串“318714101223411624”连续最长不下降数字字符串为“012234”，其长度max为6，实现该功能的VB程序段如下：s = "318714101223411624"
c=Mid(s, 1, 1)：i=1：max=0
For j=2 To Len(s)
If t> c Or j = Len(s) Then
End If
Next j
上述程序段中方框处可选语句如下：
①i=j
②t=c
③c = Mid(s, j, 1)
④If j-i>max Then max=j-i
则(1)(2)(3)(4)处语句依次为（ ）
A、③②④① B、②④③① C、②③④① D、③①④②11. 有如下VB程序段：a(1)=4：a(2)=5：a(3)=3：a(4)=1：a(5)=1：a(6)=5
s =0
For i=1 To 5
If a (i)<a(i+1) Then
t = a(i)：a(i) =a(i + 1)：a(i+1)=t
End If
s=s+a(i+ 1)
Next i
执行该程序段后，s的值是（ ）
A、10 B、11 C、18 D、1912. 某对分查找算法的VB程序段如下：Key = Val(Text1.Text)
i=1：j=10
Do While i<= j
m= (i+j)\ 2
s= s+Str(a(m)\ Key)
If a(m) > Key Then j= m- 1 Else i=m+1
Loop
Text2.Text = s
数组元素a(1)到a( 10)的值依次为“2，3，5，8，9，10，13，17，19，20”。在文本框Text1中输入待查找的整数，执行该程序段，则文本框Text2中显示的内容可能的是（ ）
A、2 1 1 B、0 1 1 1 C、0 0 1 0 D、0 2 0 1二、非选择题(本大题共4小题，4+8+7+7，共26分)
-
13. 疫情期间学生在家进行网课学习，张老师对自己所带的两个班某节技术课的听课情况进行了统计分析，如下图a所示，请回答下列问题：
(1)、单元格K4统计的是0301班在线时长率低于60%的学生人数，是使用COUNTIFS时计算得到的，并对K4：L5进行自动填充，K4单元格里的公式是。(提示：COUNTIFS函数用于计算多个区域中满足给定条件的单元格的个数。例如：= COUNTIFS(F4：F83，"<60"，B4： B83，J5)表示求F4： F83区域内所选内容小于“60”且B4：B83区域内所选内容为“0302”的单元格数据，F列、G列均为百分数。)
(2)、将工作表区域A3：H83的数据复制到新工作表，在新工作表中对“班级”和“总收看时长”进行筛选，如图b和图c所示，符合条件的筛选结果只有一项，原因是。
(3)、根据图a数据，制作图d，则该图表的数据源是。
14. 使用Flash软件制作“鱼牛的故事”动画：
(1)、创作多媒体作品需要进行需求分析和规划设计。下列属于创作需求分析的是(多选，填字母：A .了解用户的计算机应用水平/B .考虑作品创作及运行需要的硬件设施/C .确定获取原始素材的方式/D .设计作品的主要界面/E .确定作品的发布方式)。(2)、测试该场景时，“鱼”图层内容在播放完第15帧后消失，为了使该图层延续到45帧，下列操作可行的是 。(多选题，填字母)A、选中“鱼”图层第16帧执行“清除关键帧”操作 B、选中“鱼”图层第45帧执行“插入关键帧”操作 C、删除“鱼”图层第16帧 D、选中“鱼”图层第15帧执行“复制帧”操作，在第45帧执行“粘贴帧”操作 E、选中“鱼”图层第15帧执行“复制帧”操作，在第16帧执行“粘贴帧”操作(3)、“鱼”图层第1帧中的对象是完全透明的“鱼儿”元件实例。测试当前场景时，第1帧到15帧没有实现“鱼儿”元件实例由完全透明到完全显示的渐变动画效果，要实现该效果，则在“鱼”图层第1帧中将“鱼儿”实例的颜色Alpha值设为%。(4)、删除声音图层的第20帧到第45帧，对动画整体音效 (填：有/无)影响。(5)、单击“replay”按钮，跳转到“第一幕”场景第1帧并开始播放，该按钮的动作脚本命令是。15. 在一个整数序列中找第k大的数，若有相同的整数，则位置靠前的整数的名次靠前。如有整数序列为“10，13，12，13，15”，则第1大的数为15，在第5个位置，第2大的数为13，在第2个位置，第3大的数还是13，在第4个位置，第4大的数是12，在第3个位置，第5大的数是10，在第1个位置。编写一个VB程序，实现如下功能：程序启动时产生n个1~20之间的随机整数，在文本框
Text2中输人整数k(k≤n)，单击“查找"按钮Command1后，在标签Label1上显示第k大的数及位置。程序运行界面如图所示。
(1)、下列对象不具有Caption属性的是(单选，填字母：A .Command1 /B .Form1 / C .Text1 /D .Label1)(2)、实现上述功能的VB程序如下，请在划线处填入合适代码。Const n= 10
Dima(1 To n) As Integer
Private Sub Form_ Load( )
'本过程产生n个1~20之间的随机整数存数组a中，并在文本框Text1中显示，代码略
End Sub
Private Sub Command1_Click()
Dimi As Integer，key As Integer，c As Integer，k As Integer
Dim b(1 To 20) As Integer
For i= 1 To n
b(a(i)) = b(a(i)) +1
Next i
i= 20
Do While i> 1 And b(i) < k
i=i-1
Loop
Label3.Caption="第"+Str(k)+"大的数是"+Str( key)
c=0
For i=1 To n
If a(i) = key Then c= c+1
If c=
Then Exit ForNext i
Label3.Caption =Label3.Caption + "，在第"+Str(i)+"位置"
End Sub
(3)、程序代码中的加框处代码有误，请改正。16. 学校餐厅实施套餐预订制度来提升窗口打菜效率，缩短学生排队时间。每周学校都会提供“ABCD”四种套餐供学生选择，然后按每种套餐的预定数量安排特定的点餐窗口(混合套餐窗口尽量少，一人只能预订一份套餐)。安排方法如下：先计算出每个窗口的平均售卖套餐数量num=套餐总需求量(n)\窗口数(k)，然后按平均套餐数量num顺次安排“ABCD"四种套餐(首轮每个窗口出售一种套餐，数量为num)，当某种套餐需求数量或安排后剩余需求数量小于套餐平均数num时，待首轮安排结束后安排在混合窗口。如第一轮安排单-套餐窗口编号为1到b1，那么混合窗口编号为b1+1到k，为了均衡混合窗口的套餐种数，混合窗口从窗口编号k到b1+1按各类套餐剩余需求数由大到小安排一轮(安排k-b1种套餐)，然后从窗口编号b1+1到k按各套餐剩余数量由大到小顺次安排，当窗口安排套餐数量达到num时，剩余套餐换至下一窗口继续安排，最后一个窗口(k窗口)人数允许大于num。
编写VB程序，实现窗口套餐分配功能：点击“载人口点某窗口安排套餐预订信息”按钮Command1后，将预订套餐总人数显示在文本框Text1中，各套餐预订人数显示在列表框List1中，在文本框Text2中输入点菜窗口数，然后点击“窗口安排方案”按钮Command2，在列表框List2中显示点菜窗口安排结果。程序运行界面如图所示。
(1)、“ABCD”套餐预订人数如程序运行界面所示，当窗口数设置为“8”时，最后一个窗口(8号窗口)安排的套餐为。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Dim a(1 To4) As Integer'顺次存储“ABCD"四种套餐预订人数
Dim b(1 To 20) As Integer'存储各窗口安排套餐数量
Dim c(1 To 20) As String '存储窗口套餐方案
Dim n As Integer
Private Sub Command1_Click()
'载人套餐预订信息，预订人数存人n，各套餐预订数量存人a数组， 代码略
End Sub
Private Sub Command2_ Click()
Dim k As Integer，num As Integer， b1 As Integer
Dim i As Integer，j As Integer， t As Integer， t1 As Integer
Dims As String
Dim d(1 To 4) As Integer
s = "ABCD"
k = Text2.Text
num = n\k '计算各窗口平均排队人数
b1= 1
For i=1 To 4
Do While a(i)：>=num
c(b1) = Mid(s， i， 1)
b(b1) = num
a(i) = a(i)-num
b1=b1+1
Loop
Next i
b1=b1-1
For i = 1 To 4
For j=i+1 To 4
If a(i) < a(j) Then
t=a(i)：a(i)=a(j)：a(j)=t
t=d(i)：d(i)=d(j)：d(j)=t
End If
Next j
Next i
t=k
For i=1 To k-b1 '按各类套餐剩余需求数从大到小安排一轮
b(t) = a(i)
c(t) = Mid(s, d(i), 1)
a(i) = 0
t=t-1
Next i
t =i
For i=b1 To k
Do While b(i)<num Or i=k And num*(k-1)+b(k)<>n
b(i) = b(i) 十a(t)
a(t) = 0
t=t+1
Loop
If b(i)>num And i<>k Then
t=t-1
b(i) = num
End If
Next i
List2.AddItem "套餐数量”
For i =1 To k
List2.AddItem c(i) + ""+ Str(b(i))
Next i
End Sub