2018-2019学年浙江省台州市书生中学高二（上）第三次月考信息技术试卷

一、选择题（本大题共12小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）

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

  A．电子邮箱通过SMTP协议将邮件发送至收件人的邮箱服务器中

  B．网购时应关注商品的“评价信息”，其中“个人推荐”的可信度较低

  C．在微信朋友圈分享自己的旅行见闻，这一过程主要属于信息的获取

  D．信息必须依附于某种载体，它可以脱离它所反映的事物被存储和传播
  组卷：9引用：1难度：0.6

  解析

• 2．下列应用中，体现了人工智能技术的有（　　）
  ①停车场车牌识别技术的应用
  ②Word软件的查找、替换功能
  ③手机延时30秒暗屏
  ④手机微信摇一摇识别歌曲名称
  ⑤二维码识别
  ⑥刷脸考勤

  A．①③④⑤⑥

  B．①②③⑥

  C．①③④⑥

  D．①④⑥
  组卷：15引用：8难度：0.9

  解析

• 3．关于二进制、十进制与十六进制的整数，下列说法正确的是（　　）

  A．任何4位二进制数都不可能大于FH

  B．7位二进制数的最大值为128D

  C．仅凭十六进制最末位上的数，无法确定该数的奇偶性

  D．在十六进制数最末位后加上一位，此位的值为A，所得新数是原来的16倍
  组卷：13引用：2难度：0.4

  解析

• 4．使用UltraEdit软件查看字符内码，部分界面如图所示。
  
  图中内码所对应的字符是（　　）

  A．il＜＞RO

  B．ir和PM

  C．hi和OK

  D．hk和WO
  组卷：14引用：1难度：0.3

  解析

• 5．用OCR软件进行文字识别时，部分界面如图所示，分析图中信息，下列说法正确的是（　　）
  

  A．识别后的结果文件存放在“pap.jpg”文件中

  B．单击下方“相似字”右侧的“2大”，①处文字变为“大”

  C．可以使用OCR软件直接修改“pap.jpg”文件中的文字“大”

  D．文件“pap.TXT”内容当前不可见
  组卷：4引用：3难度：0.7

  解析

二、非选择题：（本大题共5小题，其中第13题4分，第14题6分，第15题5分，第16题5分，第17题6分，共26分）

• 16．小刘编写了一个求序列所有子序列和的程序。程序能够输 出所有的子序列的和，同时输出最大的子序列和。如序列中有三个元素 a（1），a（2），a（3），其子序列包括“a（1），a（2）”，“a（1），a（2），a（3）”，“a（2），a（3）”。 程序运行界面如图所示。
  实现上述功能的VB程序如下（数组每一项的值都为[-100，100]内的随机整数），请将程序代码补充完整。
  Private Sub Command1_Click （　　）
  Dim a（1To10）AsInteger
  Dim b（10）AsInteger
  Dim i As Integer,j As Integer
  Dim k As Integer,max As Integer
  Randomize
  max=-32768
  List1．Clear
  List2．Clear
  b（0）=0
  Fori=1To10
  a（i）=

   

  '（1）
  b（i）=b（i-1）+a（i）
  List1．AddItemStr（a（i））
  Nexti
  Fori=1To10
  Forj=i+1To10
  s=“a（“+Str（i）+“）“+“至“+“a（“+Str（j）+“）“+“的和为“
  k=

   

  '（2）
  If k＞maxThen max=k
  List2．AddItem s+Str（k）
  Nextj
  Nexti
  Label3．Caption=“子序列最大和为：“+

   

  '（3）
  EndSub
  组卷：2引用：1难度：0.4

  解析

• 17．在一个文档中，每行包含一个字符串。现使用如下规则对其压缩：压缩时，对于每个字符串求其与前一字符串的公共前缀，然后使用公共前缀的长度和字符串的剩余部分（以空格隔开）表示该字符串，每个空格和字符都会占用一个字节空间。图a所示为该压缩规则示意图。小明为此编写了VB程序，功能如下：运行程序时，在列表框List1中显示原字符串内容，单击“压缩”按钮Command1，在列表框List2中显示压缩后字符串，并在标签Label2中显示压缩后容量。程序运行界面如图b所示。
  
  实现上述功能的 VB 代码如下，但横线处代码有错，请改正。
  Dim word（3000）As String,pre（3000）As String
  Const n=2000
  Private Sub Form_Load （　　）
  '该过程的作用是从数据库读取 n 个单词，按字典顺序存储在数组 word 中，并在 Label1输出单词数量和容量
  '代码略
  End Sub
  Private Sub Command1_Click （　　）
  Dim conp As Integer'存储压缩后的容量
  Dim f As Boolean,m As Integer,k As Integer'k 存储公共前缀的长度
  conp=0
  For i=1To n
  k=0
  If i=1Then f=False Else f=True
   '（1）
  Do While k＜m And f=True
  If Mid（word（i），1，k+1）=Mid（word（i-1），1，k+1）Then
   ′（2）
  Else
  f=False
  End If
  Loop
  pre（i）=CStr（k）+““+Mid（word（i），k+1，Len（word（i）））
  'Cstr （　　）函数能够将数字类型的值转换为字符类型的值，并却掉前导空格。
  List2．AddItem pre（i）
  '（3）
  Next i
  Label2．Caption=“压缩后容量为“+Str（conp）+“字节“
  End Sub
  组卷：1引用：1难度：0.9

  解析