2020年浙江省“山水联盟”高考信息技术模拟试卷

一、选择题（本大题共12小题，每小题2分，共24分，每小题列出的四个备选项中只有一个是符合题目要求的，不选、错选、多选均不得分。）

• 1．下列关于信息的说法，不正确的是（　　）

  A．信息必须依附于载体，但可以脱离它所反映的事物被存储、保存和传播

  B．信息可以从一种形态转换为另一种形态

  C．信息在传递和共享过程中可以重复使用，不会产生损耗

  D．信息具有时效性，过期的信息没有任何价值
  组卷：1引用：1难度：0.7

  解析

• 2．小齐起床后先后做了下列事情，其中体现人工智能技术应用的是（　　）

  A．打开智能手环，查看晚上的睡眠质量

  B．通过刷脸在路边自动售货机买了一瓶牛奶

  C．经过自动测温仪检测温度后进入校园

  D．在实践课上，用3D打印机打印出卡通人物“大头儿子”
  组卷：3引用：1难度：0.7

  解析

• 3．使用 Access 打开数据库，部分界面如图所示，下列说法正确的是（　　）

  A．无法在“出生日期”字段输入“2002.5.11”字段值

  B．“ID”字段类型可能是文本型

  C．可以将“性别”字段类型改为“文本”类型，修改后字段值显示为“Yes”或“No”

  D．删除当前记录后，该删除操作可以撤销
  组卷：5引用：1难度：0.7

  解析

• 4．使用 UltraEdit 软件查看字符内码，部分界面如图所示。下列说法正确的是（　　）

  A．共有5个ASCII 码字符

  B．若用不同输入法输入汉字“高”，将产生不同的汉字内码

  C．字符“高”的内码二进制表示为“10111000 11011111”

  D．字符“!”的十六进制码是“20 21”
  组卷：3引用：1难度：0.5

  解析

• 5．用 GoldWave 软件编辑音频，部分界面如图所示。下列说法正确的是（　　）

  A．先执行“删除”命令，再执行“插入15秒静音”操作，保存后音频文件存储容量与原来 一样

  B．当前状态下直接保存文件，音频文件存储容量约为1.3MB

  C．执行“剪裁”命令后直接保存，音频文件存储容量大小为原来的 1 4

  D．执行“选定部分另存为”命令，按默认格式保存，生成的文件为单声道格式
  组卷：0引用：1难度：0.5

  解析

二、非选择题（本大题共4小题，其中第13小题4分，第14小题8分，第15小题7分，第16小题7分，共26分）

• 15．小章想将a数组中n个元素排列成合唱队列形态，具体方法如下：
  ①如果n是奇数，选出所有数据中最大元素，将其放在a数组正中间位置。
  ②从剩下待处理数据中选出最大的两个元素，同时将较大元素放在已处理数据段的右侧，较小元素放在已处理数据段的左侧。
  ③反复执行操作②，直到所有数据处理完毕。按上述要求，小章编写一个VB程序，功能如下：
  在文本框Text1中输入n,单击“生成”按钮Command1，并在文本框 List1 中显示排序前 数据；单击“排序”按钮Command2，在列表框 List2 中输出处理后的结果。程序运行界面如图所示。
  （1）下列哪个选项，可以将窗体Form1标题改为：“生成合唱队列”

   

  （单选，填字 母：A．Form.Caption=“生成合唱队列”/B．Label1．Caption=“生成合唱队列”/C．Form1．Caption=“生成合唱队列”）
  （2）实现上述功能的VB程序如下，请在横线处①②③填入合适代码。
  （3）程序加框处代码有错，请改正。
  Dim a（1 To 100）As Integer
  Dim n  As Integer
  Private Sub Command1_Click （　　）
  '在文本框 Text1 中输入 n（n＜=100）
  '排序前数据存储在数组 a 中，并在文本框 List1 中显示
  '代码略
  End Sub
  Private Sub Command2_Click （　　）
  Dim i As Integer,j  As Integer,t As Integer
  Dim pMax1 As Integer,pMax2 As Integer pMax1=n\2+1：pMax2=n\2
  If①Then
  For i=1 To n
  If a（i）＞a（pMax1）Then t x k w=a（pMax1）：a（pMax1）=a（i）：a（i）=t
  Next i
  pMax1=pMax1+1
  End If
  For i=1 To n\2
  If ②Then t=a（pMax1）：a（pMax1）=a（pMax2）：a（pMax2）=t j=pMax1 Mod n+1
  Do While j＜＞pMax2
  If a（j）＞a（pMax1）Then
  t=a（pMax1）：a（pMax1）=a（j）：a（j）=t t=a（pMax2）：a（pMax2）=a（j）：a（j）=t
  
  t=a（pMax2）：a（pMax2）=a（j）：a（j）=t
  End If
  ③
  Loop
  pMax1=pMax1+1
  pMax2=pMax2-1
  Next i
  For i=1 To n
  List2．AddItem Str（a（i））
  Next i
  End Sub
  组卷：0引用：2难度：0.5

  解析

• 16．为促进学生学习中互帮互助，每次考后章老师都会按成绩重新编排机房上课位置，编排要求如下：
  （1）按分数从高到低排序。若分数相同，则按学号进行升序排序。
  （2）以班级为单位，排出从 1 号开始的机房座位表。章老师编写了一个位置编排功能的 VB 程序，运行界面如图所示。
  在文本框 Text1 中输入班级名称，单击“读数据库”按钮 Command1 后，从数据库读取数 据并显示在列表框 List1 中；单击“编排”按钮 Command2，在列表框 List2 中输出学号、姓名、成绩和位置信息。程序运行界面如图所示。
  实现以上功能的 VB 程序如图，请回答下列问题：
  （1）分析程序，可知数据库的文件名为

   

  。
  （2）请在横线处填入合适的代码。
  Dim n  As Integer
  Dim xh（1 To 40）As Integer,xm（1 To 40）As String,cj（1 To 40）As  Integer
  Private Sub Command1_Click （　　）
  '本过程在文本框 Text1 中输入班级名称，从数据库中读取指定班级的学号、姓名和成绩的'数据分别存储在数组 xh,xm 和 cj 中
  Dim conn As New ADODB．Connection
  conn.ConnectionString=“provider=microsoft.ace.jye.ai.12.0；data source=″
  +App.Path+″\js.jye.ai″
  conn.Open
  Dim rs As New ADODB．Recordset rs.ActiveConnection=conn
  rs.Open″select*from 技术″
  '本过程的其他语句略
  End Sub
  Private Sub Command2_Click （　　）
  Dim wz（1 To 40）As Integer
  Dim i As Integer,j  As Integer
  List2．AddItem“学号″&″″&″姓 名″&″″&″成绩″&″″&″位置″
  For i=1 To n
  ①
  Next i
  For i=1 To n
  For j=1 To n
  If ②Then wz（i）=wz（i）+1
  End If
  Next j
  List2．AddItem adj（Str（xh（i）））+adj（xm（i））+adj（Str（cj（i）））+adj（Str（wz（i）））
  Next i
  End Sub
  Function adj（c As String） As String'固定输出 5 个字符长度
  Dim i As Integer
  ③
  For i=1 To 5-Len（c）
  adj=adj+″″
  Next i
  End Function
  组卷：0引用：1难度：0.5

  解析