2020年浙江省杭州高级中学高考信息技术仿真模拟试卷
发布：2025/1/1 9:0:2
一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的，不选、错选、多选均不得分。）
-
1．下列有关信息的说法，正确的是（ ）
组卷：7引用：2难度：0.5 -
2．下列有关浏览器与收藏夹的说法，正确的是（ ）
组卷：0引用：1难度：0.6 -
3．小悦使用Word软件处理信息的部分界面如图所示，下列说法正确的是（ ）
组卷：1引用：1难度：0.5 -
4．某Access数据表编辑界面如图所示，以下说法错误的是（ ）组卷：13引用：9难度：0.7 -
5．使用Photoshop软件对“元宵节1．psd”进行处理，编辑界面如图所示。下列说法正确的是（ ）
组卷：3引用：1难度：0.5
二、非选择题（本大题共4小题，其中第13小题4分，第14小题8分，第15小题7分，第16小题7分，共26分。）
-
15．某校运动会跳远比赛，共m位（m≤20）选手参加该比赛，第一轮初赛每位选手跳3次，然后按每位选手的最好成绩，按高到低取前k名（若最好成绩相同，则名次相同）进入第二轮复赛。
每位选手的成绩数据记录规则如下：成绩数据以“；”（分号）结尾，中间用“/”（斜杠）分隔，例如：“王一超/4.10/-/3.78；李雨歆/3.87/3.85/4.20；”，表示第一位选手王一超，第一次成绩4.10米，第二次成绩无效（用“-”表示），第三次成绩3.78米，最好成绩为4.10米。第二位选手李雨歆，3次成绩分别是3.87米、3.85和4.20米，最好成绩为4.20米。
小强编写VB程序实现上述功能：程序运行时，读取所有选手数据保存在变量cj中，并显示在列表框 List1中。在文本框Text1中输入进入第二轮的名次，单击“第二轮复赛名单”按钮 Command1，对数据进行统计分析，并在列表框 List2 中显示进入复赛的选手名单和最好成绩，程序运行界面如图所示，请回答下列问题。
（1）代码“List2．AddItem”中的 AddItem 是（单选，填字母：A．事件名/B．方法名/C．属性名）。
（2）实现上述功能的 VB 程序如下，请在横线处填入合适的代码。
（3）程序中加框处代码有错，请改正。
Private Sub Command1_Click （ ）
Dim cj As String,xm（1 To 20）As String,maxcj（0 To 20）As Single
Dim s As String,c As String,t As Single,z As Integer
Dim i As Integer,j As Integer,n As Integer,k As Integer,m As Integer
'读取所有选手数据保存在变量cj中，并显示在列表框 List1中，代码略
n=Len（cj）
i=1：m=1：z=1
Do While i＜=n
c=Mid（cj,i,1）
j=i
Do While
'（3）
i=i+1
c=Mid（cj,i,1）
Loop
If z=1 Then
①
Else
t=Val（Mid（cj,j,i-j））
If t＞maxcj（m） Then maxcj（m）=t
End If
z=z+1：i=i+1
If c=″；″Then m=m+1：z=1
Loop
m=m-1
k=Val（Text1．Text）
For i=1 To m-1
For j=②
If maxcj（j）＞maxcj（j-1）Then
c=xm（j）：xm（j）=xm（j-1）：xm（j-1）=c
t=maxcj（j）：maxcj（j）=maxcj（j-1）：maxcj（j-1）=t
End If
Next j
If ③Then
List2．AddItem xm（i）+Str（maxcj（i））
Else
Exit For
End If
Next i
End Sub组卷：0引用：1难度：0.5 -
16．某地区进行了4三个年级技术联考，现要求按学校分类对高三年级技术成绩降序排序后输出。小王编写了一个VB程序实现上述要求。先单击“统计”按钮Command1，读取数据库中每位学生的学校、年级、姓名和成绩等信息，进行统计分析后，并在列表框List2中分学校按成绩降序输出。程序运行时界面如图所示。
（1）根据图中示例数据，采用选择排序算法分别对学校B的数据进行排序，整个排序过程中，数组元素之间的比较次数是（单选，填字母：A．37×19 次/B．37×18 次/C．36次）。
（2）请在横线处填入合适的代码。
Const rs=480'联考参加学生总人数rs
Const no=3'联考参加学校数no
Dim school（1 To rs） As String'存储学生的学校
Dim nj（1 To rs） As String'存储学生的年级
Dim xm（1 To rs） As String'存储学生的姓名
Dim cj（1 To rs） As Integer'存储学生的成绩
Dim p（1 To rs） As Integer'索引数组
Dim num（1 To no） As Integer
Dim n As Integer
Function id（s As String） As Integer
'根据学校名称转换为对应的数字ID号，代码略
End Function
Private Sub form_load （ ）
'本过程读取每位学生的学校、年级、姓名和成绩的数据分别存储在数组school,nj、xm 和 cj 中，并在 List1 中显示学生成绩数据和每个学校的高三人数，代码略；
End Sub
Private Sub Command1_Click （ ）
Dim i As Integer,j As Integer,k As Integer,t As Integer,pos As Integer
Dim b（1 To no） As Integer,c（1 To rs） As Integer,q（1 To rs） As Integer
k=0
For i=1 To n
If nj（i）=″高三″Then
k=k+1
p（k）=①
num（id（school（i）））=num（id（school（i）））+1
End If
Next i
'在 List1 中显示各学校的高三人数，代码略；
c（1）=1
For i=2 To no
c（i）=c（i-1）+num（i-1）
Next i
For i=1 To k
t=id（school（p（i）））
②
c（t）=c（t）+1
Next i
'----按学校分类，从高分到低分排序后输出-----
pos=1
For i=1 To no
For j=pos To c（i）-2
For m=c（i）-1 To j+1 Step-1
If ③ Then
temp=q（m）：q（m）=q（m-1）：④
End If
Next m
Next j
pos=c（i）
Next i
For i=1 To k
List2．AddItem school（q（i）） &″″& xm（q（i）） &″″& nj（q（i）） &″″& cj（q（i））
Next i
End Sub组卷：0引用：1难度：0.3
