2020-2021学年浙江省五湖联盟高三（上）期末信息技术试卷

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

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

  A．信息一旦产生，其价值就不会改变

  B．信息可以脱离载体而存在

  C．信息无处不在，且呈现形式多样，可重复使用，但多次使用会产生损耗

  D．信息可以脱离它所反应的事物被存储。
  组卷：6引用：1难度：0.6

  解析

• 2．下列行为合法的是（　　）

  A．某软件公司的职工将公司软件转于他人使用，并私自获利

  B．某娱乐场所以卡拉OK方式放映已授权于他的音乐电视作品

  C．在未经作家授权的情况下，某公司向用户提供能够免费下载该作家收费作品的应用软件

  D．某网民因无法联系著作权人，就擅自修改该著作权人的网络游戏软件，供其他网民使用
  组卷：8引用：3难度：0.9

  解析

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

  A．该数据表中共有 15 条记录

  B．“学号”字段不可以设置成“文本”类型

  C．删除当前记录后，不可以通过“撤销”命令恢复数据

  D．Access 数据库中的数据可以从 Excel 导入，所以Excel也是小型数据库管理系统。
  组卷：4引用：1难度：0.5

  解析

• 4．用Ultra Edit软件观察字符“2021，cheer up！”的内码如图所示，以下说法正确的是（　　）
  

  A．图中有 16 个 ASCII 码编码的字符

  B．“2”的十六进制内码为 32，则“10”的十六进制内码为 3A

  C．大写字母“E”的内码用二进制表示为 010001 01

  D．小写字母“p”的内码转十进制的过程应为 6*16^2+15*16^1。
  组卷：5引用：1难度：0.5

  解析

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

  A．该音频文件为mp3格式，采样频率为44100Hz

  B．当前状态下，执行“删除”操作，音频文件将变为单声道

  C．当前状态下，执行“插入静音”添加1秒静音后，右声道时长不变

  D．当前状态下，先执行“复制”，再执行“粘贴”，音频时长将变成8秒
  组卷：3引用：2难度：0.2

  解析

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

• 15．凯凯学习了桶排序和冒泡排序，他发现桶排序占空间比较多而冒泡排序的效率又较低，于是他想到综合两个算法来对数据进行排序。凯凯对 n 个由二位数组成的数据进行排序，排序步骤如下：
  （1）以每个数的十位数来区分，放置到各个桶里（如图①）；
  （2）分别对每个桶中的数据进行冒泡排序（如图②）；
  （3）最后依次输出各个桶中的数据即可（如图③）
  
  Dim a（1 To 100）As Integer,b（1 To 100）As Integer
  Dim c（0 To 10）As Integer Dim n As Integer
  Private Sub Form_Load

   

  
  '读取若干个二位数到 a（i）中，并保存个数到 n
  End Sub
  Private Sub Command1_Click

   

  
  Dim i As Integer,t As Integer
  For i=1 To n
  c（a（i）\10）=c（a（i）\10）+1
  Next i
  c（0）=1：c（10）=

   

  
  For i=1 To 9
  c（i）=c（i）+c（i-1）
  Next i
  For i=1 To n
  t=a（i）\10
  c（t）=c（t）-1
  

   

  
  Next i
  For i=1 To 9
  Call px（c（i），c（i+1）-1）
  Next i
  For i=1 To n
  List2.AddItem b（i）
  Next i
  End Sub
  Sub px（x As Integer,y As Integer）
  Dim t As Integer,i As Integer,j As Integer
  For i=

   

  
  For j=x To y-i
  If b（j）＞b（j+1）Then
  t=b（j）：b（j）=b（j+1）：b（j+1）=t
  End If
  Next j
  Next i
  End Sub
  （1）若要修改“桶排”按钮上显示的文字，应修改的属性名是

   

  。
  （2）加框处代码有错，请改正。
  （3）请在横线处填入合适的代码。
  组卷：0引用：1难度：0.3

  解析

• 16．信息科代表楠楠想给美丽的信息老师写一段心里话，又怕被人发现，于是想了一个两全其美的方法。楠楠有两张n*n大小的纸，一张是透明的，一张是有字的。楠楠在透明的纸上涂黑了一些格子，然后把两张纸一起给信息老师，并告诉老师阅读方法：首先把透明的纸盖在另一张纸上，然后把露出来的字母从上到下从左到右写下来并将每个字母向左循环移一位（如取出是D，则左移为C），然后将透明的纸顺时针旋转90度，再读一遍，这样子一共读四遍，就得到情书内容。
  （1）若透明纸上的涂黑处（“O”没有涂黑的地方，“#”代表被涂黑的地方）如图a所示，有字纸张内容如图b所示，则获取的情书内容的前八位内容

   

  。
  
  （2）楠楠根据上述阅读规则，结合学科特点，发挥自己 特长，设计了一科个获取心里话的小程序。其VB代码和运行界面如图c所示，请在横线处填入合适的代码。
  Dim a（1 To 1000）As String
  Const n=4
  Private Sub Form_Load （　　）
  Dim x As Integer,s As String
  Dim b（1 To n*n） As Boolean
  Randomize
  For i=1 To n‘随机产生n个位置，使得这些位置表示未被涂黑
  

   

  
  If b（x）=False Then
  a（x）=″0″
  b（x）=True
  Else
  i=i-1
  End If Next i
  ‘将其余位置赋值为“#”，存入数组a相应的位置中，并将结果按n行n列的方式显示在列表框list1上，代码略
  End Sub
  Private Sub Command1_Click

   

  
  Dim s As String,jg As String,ch As String
  s=″HAOXUEXIHAODUSHU″
  For i=1 To n*n Step n
  List2.AddItem Mid（s,i,n）
  Next i
  For i=1 To n
  For j=1 To n*n
  If a（j）=″0″Then
  ch=Mid（s,j,1）
  ch=

   

  
  jg=jg+ch
  End If
  Next j
  Call turn（n）‘调用过程turn,完成矩阵顺时针旋转90度
  Next i
  Label1.Caption=jg End Sub
  Sub turn（x As Integer）
  Dim i As Integer,j As Integer
  Dim c（1 To n*n） As String
  For i=1 To x
  For j=1 To x
  c（（i-1）*x+j）=

   

  
  Next j
  Next i
  For i=1 To n*n
  a（i）=c（i）
  Next i End Sub
  组卷：4引用：1难度：0.2

  解析