2020-2021学年浙江省嘉兴市浙北南湖区嘉兴一中、湖州中学高二（下）期中信息技术试卷

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

• 1．以下关于信息和信息技术说法不正确的是（　　）

  A．使用微信“扫一扫”扫描二维码，属于信息的解码

  B．微信具有朋友圈功能，用户可以发布图文信息，这主要体现了信息的共享性

  C．“**教育”公众号中文章的点赞数量属于核心刊物评价

  D．广播电视、电影技术都属于近代信息技术
  组卷：10引用：1难度：0.7

  解析

• 2．下列应用中，体现了人工智能技术的有（　　）
  ①使用红外测温枪，不接触就能测量体温
  ②使用翻译笔直接将普通话翻译成英语
  ③某网站将用户上传的视频进行压缩转码后输出
  ④通过人脸识别，直接获取“绿码”信息

  A．①②③

  B．②③④

  C．②④

  D．③④
  组卷：5引用：1难度：0.5

  解析

• 3．用 Access 创建一张数据表，如图所示．（　　）

  A．“书籍编号”字段数据类型一定是“数字”

  B．当前数据表视图下不可以修改字段名称

  C．单击①处，可以增加一个自动编号类型的字段

  D．某条记录的“收藏日期”字段中输入“2013 年 06 月 10 日”也符合格式要求
  组卷：18引用：3难度：0.7

  解析

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

  A．输入字符“10”显示的内码是“31 30”

  B．图中使用ASCII编码的有5个字符

  C．汉字“炎”所占存储空间为4字节

  D．图中“！”为全角字符，内码为“A1”
  组卷：13引用：3难度：0.6

  解析

• 5．用Photoshop软件制作“开学疫情防控”作品，进行相关编辑后的文字效果如图所示。
  
  下列描述不正确的是（　　）

  A．当前状态下，不可以直接对“背景”图层添加图层样式

  B．“疫情防控”图层只显示了两种图层样式效果

  C．当前“城市”图层中的内容呈现半透明效果

  D．当前状态下，不可以直接对“疫情防控”图层添加滤镜
  组卷：1引用：1难度：0.6

  解析

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

• 15．编写一个 VB 程序，实现程序功能如下：打开程序时，随机产生 10个两位正整数存入数组a中，并在列表框 List1 中显示。单击“排序”按钮Command1 后，在列表框 List2中显示左右交替上升序列，程序运行界面如下图所示。排序方法：使用选择排序算法将数组改造成左右交替上升序列，即将最小值放在最左端，第2小值放在最右端；再将第3小值放到左端，第4小值放到右端。以此类推，直到形成左右交替上升序列。例如将数组a=（4，8，2，9，3，6，1，7，5，10），排序成a=（1，3，5，7，9，10，8，6，4，2）。
  （1）该程序界面中有几类对象：

   

  （填数字）
  （2）实现上述功能的 VB 程序如下，请在横线处填上合适的代码。
  （3）加框处代码有误，请改正。
  Const n=10
  Dim a（1 To n）As Integer
  Private Sub Form_Load

   

  
  For i=1 To n
  a（i）=①

   

  ’产生两位随机正整数
  List1.AddItem Str（a（i））
  Next i
  End Sub
  Private Sub Command1_Click

   

  
  Dim p As Integer,q As Integer,pos1 As Integer,pos2 As Integer,t As Integer
  p=1：q=n
  Do While ②

   

  
  If a（p）＜=a（p+1）Then
  pos1=p：pos2=p+1
  Else
  pos1=p+1：pos2=p
  End If
  For i=
  If a（i）＜a（pos1）Then
  pos2=pos1
  pos1=i
  ElseIf a（i）＜a（pos2）Then
  pos2=i
  End If
  Next i
  If pos1＜＞p Then t=a（pos1）：a（pos1）=a（p）：a（p）=t
  If pos2=p Then ③

   

  
  If pos2＜＞q Then t=a（pos2）：a（pos2）=a（q）：a（q）=t
  p=p+1：q=q-1
  Loop
  For i=1 To n
  List2.AddItem Str（a（i））
  Next i
  End Sub
  组卷：0引用：1难度：0.5

  解析

• 16．小美在研究自定义货币系统，她想知道和自定义的任意货币系统等价，同时面额种数最少的货币系统中有多少种面额。例如，和{3，6，10，19}等价的货币系统中，面额种数最少的是{3，10}，即可用{3，10}表示{3，6，10，19}中的任意数。
  在寻找等价货币系统时，小美发现了如下规律：
  1.与给定货币系统等价的货币系统必定是该货币系统的子集；
  2.如果货币系统中的某个面额可以被其他货币表示时，该面额是无效的；
  为此，小美按照如下方法构造最小等价货币系统B：先将原货币系统A的所有面额升序排序，每次把A中可以被B中的货币表示的面额删去后，将A中的最小面额放入B中。以此类推。基于此方法，小美编写了如下程序，在文本框Text1中输入给定的货币系统，单击按钮Command1后，在标签Label1中输出与其等价的货币系统的最小面额种数，在标签Label2中输出该货币系统。程序运行界面如图所示。
  （1）若给定货币系统为{4，6，8，14，22}，则与其等价的面额种数最少的货币系统为

   

  。
  （2）按此要求编写的程序如下，请在横线处填入合适的代码。
  Private Sub Command1_Click

   

  
  Dim s As String,tmp As String,c As String
  Dim n As Integer,i As Integer,j As Integer,ans As Integer
  Dim a（1 To 100）As Integer,b（1 To 10000）As Boolean
  '数组b（i）用于表示值i能否用已经放入新货币系统中的面额来表示
  '此段程序用于将给定货币系统存储在a数组中并将其元素个数存储在变量n中
  s=Text1.Text
  tmp=““：n=0
  For i=1 To Len（s）
  c=Mid（s,i,1）
  If c＞=“0“And c＜=“9“Then
   ①

   

  
  ElseIf tmp＜＞““Then
  n=n+1
  a（n）=Val（tmp）
  tmp=““
  End If
  Next i
  For i=1 To n-1
  For j=n To i+1 Step-1
  If ②

   

   Then
  t=a（j）：a（j）=a（j-1）：a（j-1）=t
  End If
  Next j
  Next i
  ans=0：s=“{“
  For i=1 To a（n）
  b（i）=False
  Next i
  For i=1 To n
  If Not b（a（i））Then
  ans=ans+1
  If ans＜＞1 Then s=s+“，“
  s=s+CStr（a（i））'Cstr函数用于将数值变量转为字符串变量并去除首位空格
   ③

   

  
  For j=a（i）+1 To a（n）
  If b（j-a（i））=True  Then b（j）=True
  Next j
  End If
  Next i
  s=s+“}“
  Label1.Caption=“与之等价的最小货币系统面额种数为“+Str（ans）
  Label2.Caption=“其为“+s
  End Sub
  组卷：0引用：1难度：0.5

  解析