浙江省“七彩阳光”新高考研究联盟2021届高三上学期信息技术期中联考试卷
试卷更新日期:2021-08-13 类型:期中考试
一、选择题
-
1. 下列有关信息和信息处理的说法,错误的是( )A、用计算机处理信息,必须先将信息数字化 B、信息必须依附于载体,不能脱离它所反映的事物被存储 C、微信“扫一扫”的功能,属于信息的获取过程 D、CPU是影响计算机信息处理能力的主要因素之一2. 下列关于网页与浏览器的说法,正确的是( )A、网页必须包含文字、图像、超链接这三种基本要素 B、网页中的文本、图像、超链接等元素是用 HTML(超文本标记语言)描述的 C、搜索引擎通过自动网页搜索技术将互联网上的全部数据保存在数据库中 D、在IE浏览器中,使用“添加到收藏夹”功能可以将正在浏览的网页内容保存到本地计算机中3. 小王使用Access软件设计“学生信息”数据表,其中设计最合理的是( )A、 B、 C、 D、4. 下列关于计算机信息编码的描述,错误的是( )A、中文字符的GB2312编码是一种常见的汉字机内码 B、数据压缩本质上是对信息重新编码 C、半角英文字符采用7位二进制数进行编码,该编码标准为ASCII码 D、将学号制作成二维码,这一过程属于信息的编码5. 用Photoshop软件制作“教师节”作品,部分界面如图所示。下列说法正确的是( )A、使用文字工具将“师恩”两字的颜色改为绿色 B、“笔筒”图层处于锁定状态,不能修改该图层的名称 C、可以仅对“文字”图层中的“老师”两字添加“内阴影”图层样式 D、将该PSD文件存储为BMP文件,则该BMP文件的大小约为1.29MB6. 一段时长为10秒、画面尺寸为1024×800像素、色彩模式为256级灰度的NTSC制式(30 fps)且未经压缩的无声AVI视频,转换为MPG格式后容量为23.4MB,则压缩比约为( )A、5:1 B、10:1 C、20:1 D、80:17. 有如下 VB 程序段:
t = "abcd123456" : x = Int(Sqr(Len(t))) : y=1
If x > 3 Then
y =2
ElseIf x > 2 Then
y=3
ElseIf x > 1 Then
y=4
End If
执行该程序段后,变量y的值为( )
A、1 B、2 C、3 D、48. 某算法的部分流程图如图所示,若变量a和变量b的输入值分别为16和12,则输出变量a的值为( )A、8 B、6 C、4 D、29. 有如下VB程序段:x = 4095 : s1 = "ABCDEFGHIJ" : s2 = "abcdefghij"
ret=""
Do While x > 0
r = x Mod 10
If r Mod 2 = 1 Then
ret = Mid(s1, r + 1, 1) & ret
Else
ret = ret & Mid(s2, r + 1, 1)
End If
x = x \ 10
Loop
Text1.Text = ret
执行该程序段后,文本框Text1中显示的内容为( )
A、JFae B、JFea C、eaJF D、EAfj10. 对一组数据采用冒泡排序算法进行排序,若第一趟排序完成后的数据序列为:31,24,23,15,20,10,则该数据序列的原始顺序不可能的是( )A、24,23,15,31,10,20 B、24,23,15,20,31,10 C、24,31,23,15,10,20 D、23,24,15,20,31,1011. 数组a中存储着某市2010年到 2019 年的GDP数值,编写VB程序,实现找出相邻两年GDP变化最大(即相邻两年GDP差值最大)的年份区间。若有多个符合要求的年份区间,只输出距今最近的年份区间。部分代码如下所示Dim i As Integer, imax As Integer
①
For i = 3 To 10
If Abs(a(i) - a(i - 1)) >= ② Then imax = i
Next i
Text1.Text = "GDP变化最大的年份区间是" + Str(imax + 2008) + "-" + Str(imax + 2009)
划线处①、②应填入的代码为( )
A、①imax=1 ②Abs(a(i - 1) - a(i - 2)) B、①imax=1 ②Abs(a(imax) - a(imax - 1)) C、①imax=2 ②Abs(a(i - 1) - a(i - 2)) D、①imax=2 ②Abs(a(imax) - a(imax - 1))12. 有如下 VB 程序段:For i = 1 To 6
a(i) = Int(Rnd * 20) + 1: b(i) = i
Next i
For i = 1 To 5
For j = i+1 To 6
If a(b(i))>a(b(j)) Then
t = b(j): b(j) = b(i): b(i) = t
End If
Next j
Next i
i = 1 : j = 6: s="" : Key = Val(Text1.Text)
Do While i <= j
m = (i + j) \ 2
If Key = a(b(m)) Then Exit Do
If Key < a(b(m)) Then j = m - 1 Else i = m + 1
s = s + Str(m)
Loop
Text2.Text = s
在文本框Text1中输入10,运行以上程序段后,文本框Text2中显示的内容为 3 5 4,则 a 数组中 a(1)到 a(6)各元素的值可能的是( )
A、11,6,4,13,18,15 B、4,5,8,19,10,17 C、2,11,7,6,3,18 D、9,2,11,21,5,16二、非选择题
-
13. 小王收集了部分理财产品和银行定期存款的利率数据,如图a所示。请回答下列问题:(1)、D3:E10区域单元格格式设置如图b所示,计算年化收益率,可在E3单元格输入公式“=D *12”, 再通过自动填充完成区域E4:E10的计算,则E5单元格和E10单元格中显示的结果分别是(单选,填字母:A .18和0 /B .18.00 和 0.00 /C .18.00和#REF!/D .18.00和#VALUE!)(2)、对图a中的前5家银行按照月利率进行降序排序,应选择的数据区域是;(3)、根据图a中的数据制作如图c所示的图表,下列说法正确的是 (多选)。A、制作该图表的数据区域为C2:D2,C5:D9 B、为了使图表中的数据对比更加明显,应对图表的坐标Y轴“最大值”和“主要刻度单位”做修改 C、为了使图表柱形上方显示具体的数字,应设置数据标签选项 D、对图a中区域B2:E10的“名称”和“月利率%”进行筛选,筛选方式分别如图d和图e所示,则图表中只显示1家银行的月利率数据14. 使用Flash软件创作一个关于“教师节”的多媒体作品,部分界面如下图所示。请回答下列问题:(1)、在制作作品前,小明进行了相应的需求分析。下列不属于创作需求分析的是。(多选,填字母:A .该作品要求使用 Flash 软件制作 / B .该作品主要面向中小学生 / C .该作品的主题思想为“感恩老师” / D .该作品的使用价值和使用频率如何 / E .分析作品所需素材(图片声音等)的获取方式、用什么软件处理等)(2)、“师恩”图层使用了“师恩”元件产生的实例制作补间动画,实现从舞台外左侧由快变慢地移入舞台中的动画效果,则该图层第 1 帧中设置的缓动属性值是(填字母:A .-100 /B .0 /C .100),该补间动画的类型可能是。(3)、“音乐”图层中的声音同步属性为“数据流”,测试场景时,若要使动画播放到第 20 帧时,声音重新开始播放,可进行的操作是。(4)、测试影片时,“进入”按钮在影片播放到最后一帧时出现,单击“进入”按钮,影片跳转到“Main”场景第1帧继续播放,则“进入”按钮的动作脚本为。15. 某高一班主任需要对刚入学的新生排座位,教室座位按 6 排 8 列进行摆放(班级学生数不超过48个),并且要求每列的学生按身高从低到高排列。编写 VB 程序,实现教室排座位功能:单击“读取数据”按钮 Command1,从数据库中读取该班所有同学的班内学号(两位数字)和身高数据(3位数字),并在列表框List1中按8个一行显示;单击“排座位”按钮 Command2,对每列数据按身高从小到大排列,并显示在列表框List2中。程序运行界面如图所示,请回答下列问题:(1)、要使窗体的标题栏文字显示为“排座位”,则应设置窗体的属性(单选,填字母:A .Text / B .Name /C .Caption)。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。
Const m = 6
Const n = 8
Dim a(1 To m * n) As String '存储学号
Dim b(1 To m * n) As Integer '存储身高
Dim num As Integer '班级总人数
Private Sub Command1_Click( )
'从数据库中读取该班的学号和身高数据存入数组a和数组b,班级人数存入变量num,代码略
'以下代码为在列表框List1中输出数据
s = "" : List1.AddItem " ( 讲 台 )"
For i = 1 To num
s = s & Str(b(i)) & "[" & a(i) & "] "
If Then
List1.AddItem s : s = ""
End If
Next i
If s <> "" Then List1.AddItem s
End Sub
Private Sub Command2_Click( )
Dim i As Integer, j As Integer, imin As Integer
Dim t1 As String, t2 As Integer, s As String
List2.AddItem " ( 讲 台 ) "
For i = 1 To
s = ""
For j = (i - 1) * n + 1 To (i - 1) * n + n
If j <= num Then
If imin <> j Then
t1 = a(imin): a(imin) = a(j): a(j) = t1
t2 = b(imin): b(imin) = b(j): b(j) = t2
End If
s = s & Str(b(j)) & "[" & a(j) & "] "
End If
Next j
List2.AddItem s
Next i
End Sub
Function fPos(p As Integer) As Integer
Dim i As Integer, j As Integer, k As Integer
k = p
For i =
If b(i) < b(k) Then k = i
Next i
fPos = k
End Function
(3)、程序中加框处代码有错,请改正。16. 某地区中考录取采用“平行志愿”的投档录取方式,该录取方式的具体规则为:①根据考生的考试总分从高到低依次对考生的填报志愿进行投档;
②每位考生可填三个志愿学校,轮到该考生投档时依次对其三个志愿进行投档,若第一志愿学校还有剩余招生名额,就被第一志愿学校录取,结束该考生的投档,否则需对其后续志愿学校进行同样的投档操作,若该考生所填的所有志愿学校都没有剩余招生名额,则该考生无法被任何学校录取,该考生的投档结束。
③当所有学校都已完成计划招生数时,停止投档,录取结束。
编写 VB 程序,实现上述“平行志愿”投档录取的功能,单击“读取考生数据”按钮 Command1, 则从数据库中获取所有考生的成绩、志愿信息以及每个学校的计划招生数,单击“投档录取”按钮 Command2,开始进行投档录取, 并在列表框 List1 中输出每个学校的计划招生数、实际招生数、录取分数线和最低录取名次信息,程序运行界面如图所示。请回答下列问题:
(1)、若A校计划招生520人,B校计划招生480人,C校计划招生540人,某同学的考分名次为490名,其三个志愿学校依次为B校、A校、C校,且已知同名次的人数最多有30人,则该同学不可能被哪所学校录取:。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。Const schCnt = 5 '学校数量
Const stuMaxCnt = 10000 '最多考生人数
Dim zsCnt(1 To schCnt) As Integer '存储每个学校的计划招生人数
Dim zsCnt2(1 To schCnt) As Integer '存储每个学校的实际招生人数
Dim a(1 To stuMaxCnt) As Single '存储考生总分成绩
Dim b(1 To stuMaxCnt * 3) As Integer '存储考试志愿,每个考生有3个志愿,每个志愿为学校编号
Dim stuCnt As Integer '实际考生总人数
Private Sub Command1_Click()
'从数据库中读取所有考生的总分和志愿信息存储到数组a和数组b中(第1个考生总分存储到a(1),第1个考生的3个志愿分别存储到b(1)、b(2)、b(3)中, …),然后按总分对数组a和数组b进行降序排序,总分相同时,需根据各科成绩决定排序先后,但名次相同,考生总人数存储到stuCnt变量中;
'读取每个学校的计划招生数,存储到数组zsCnt中;
'以上功能代码略
End Sub
Private Sub Command2_Click()
Dim sch As Integer '学校代码,用1~5中的一个数字表示某学校代码
Dim i As Integer, j As Integer, finished As Integer, prevScore As Single
Dim stuMc(1 To stuMaxCnt) As Integer
Dim MinScore(1 To schCnt) As Single
Dim MinMc(1 To schCnt) As Integer
finished = 0: i = 1
prevScore = -1
Do While
If a(i) = prevScore Then
stuMc(i) = stuMc(i - 1)
Else
End If
prevScore = a(i)
For j = 1 To 3
If zsCnt2(sch) < zsCnt(sch) Then
zsCnt2(sch) = zsCnt2(sch) + 1
MinScore(sch) = a(i)
MinMc(sch) = stuMc(i)
Exit For
End If
Next j
finished = 0
For j = 1 To schCnt
If zsCnt2(j) = zsCnt(j) Then
finished = finished + 1
End If
Next j
i = i + 1
Loop
'在List1中输出每所学校的代码、计划招生数、实际招生数、录取分数线、最低录取名次,代码略
End Sub