2017-2018学年浙江省温州新力量联盟高二（上）期末信息技术试卷（选考）

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

• 1．下列关于信息的描述不正确的是（　　）

  A．信息可以被重复使用不会产生耗损

  B．无线电技术使信息可以不依附载体存在

  C．信息应尽可能经过甄别后再使用

  D．相同内容的信息可以有多种不同的表达方式
  组卷：38引用：1难度：0.9

  解析

• 2．网页中包含的文本、图象、超链接和表格等基本元素及构件是由（　　）进行描述的。

  A．HTTP

  B．SMTP

  C．HTML

  D．WEB
  组卷：3引用：1难度：0.9

  解析

• 3．以下选项中，运用了人工智能的是（　　）

  A．用手机将练习册上有疑问的试题拍摄后通过微信发给老师，并就试题内容向老师请教

  B．在手机上设定闹钟叫醒自己

  C．利用微信语音聊天功能与朋友相互问候

  D．将微信上他人发来的语音转换成文字
  组卷：13引用：1难度：0.9

  解析

• 4．小明为如图所示的数据表提出了修改建议。以下建议中，当前状态下操作能实现的是（　　）
  

  A．孙雯的入学时间格式有误，建议输入“2015/8/32”

  B．建议将序号字段的数据类型设置为“自动编号”，可以节省输入序号的时间

  C．建议将联系电话字段的数据类型设置为“文本”

  D．建议将性别字段的类型改为“文本”，表中已有数据的性别将以“男”或“女”显示
  组卷：23引用：1难度：0.7

  解析

• 5．某算法的部分流程图如图所示，执行这部分流程后，下列说法正确的是（　　）

  A．输出的 a,b 值分别为 5，11

  B．输出的 a,b 值分别为 5，14

  C．条件 b＜10 被判断了 6 次

  D．语句 b←3*a-1 被执行了 4 次
  组卷：1引用：1难度：0.7

  解析

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

• 16．小刘为班级的抽奖活动编写了一个 VB 程序。单击“抽取”按钮 command1 时，在列表框 List1 中显示按用户抽取人数在学号起讫范围内（最大学号不超过 100）随机抽取到不重复的学号。程序运行界面如图所示。 
  
  实现上述功能的 VB 程序如下，但加框处代码有错，请改正。 Dim xh（1To 100）As Integer
  Dim yx As Integer
  Private Sub Command1_Click

   

   Dim n1，n2，n,x As Integer List1．Clear
  Randomize
  n1=Val（Text1．Text） n2=Val（Text2．Text） n=Val（Text3．Text） If n＜=n2-n1Then
  yx=1
  Do While yx＜=n
  x='①
  If yx=1Then
  xh（yx）=x
  yx=2
  Else
  If qc（x）=True Then
  xh（yx）=x
  yx=yx+1
  End If
  End If
  Loop
  For i=1To n
  List1．AddItem Str（xh（i））
  Next i Else
  MsgBox“你输入的抽取人数不能实现，请重新输入。“End If
  End Sub
  Public Function qc（t As Integer） As Boolean For j=1To yx
  If xh（j）=t Then
  qc=False
  Exit For
  End If Next j
  If  Then qc=True'②End Function
  （1）加框处①有错，应改为

   

  。
  （2）加框处②有错，应改为

   

  。
  组卷：6引用：1难度：0.3

  解析

• 17．在一个长度为 n 的数字序列中，如果相邻元素差的绝对值经过升序排序后正好是 1 到 n-1，则认定该序列存在着“有趣的跳跃”。例如：数字序列 1、4、2、3 的相邻数字差的绝对值分别为 3、2、1，排序后是 1、2、3，则说明该序列存在着“有趣的跳跃”。
  小明编写了 VB 程序用于数字序列的检测，程序运行界面如图所示。在文本框 Text1 中逐个输入数字，依 次存储到数组 a 中，并在列表框 List1 中显示。单击“判断”按钮 Command1，将原始数字序列相邻数字差 的绝对值依次存储到数组 b 中，并对数组 b 进行升序排序后在列表框 List2 中显示；若输入的数字序列存在“有趣的跳跃”，则在文本框 Text2 中输出“yes”，否则输出“no”。
  （1）若输入序列 3、13、24、35、47、30，单击“判断”按钮后，文本框 Text2 中将显示

   

  。
  （2）实现上述功能的 VB 程序如下，请在横线处填入合适代码。Dim n As Integer'存储序列的元素个数
  Dim a（1To 100）As Integer'存储原始数字序列
  Dim b（1To 100）As Integer'存储相邻数字的差值绝对值 Private Sub Form_Load （　　）
  n=0End Sub
  Private Sub Text1_KeyPress（KeyAscii As Integer） If KeyAscii=13Then
  n=n+1
  ①
  List1．AddItem str（a（n）） Text1．Text=““
  End If End Sub
  Private Sub Command1_Click （　　）
  Dim i As Integer,j As Integer,k As Integer,m As Integer Dim flag As Boolean
  m=n-1
  For i=1To m
  b（i）=②
  Next i
  For i=2To m k=b（i）
  For j=i-1To 1Step-1
  If k＞b（j） Then Exit For b（j+1）=b（j）
  Next j
  ③=k
  Next i flag=True
  For i=1To m List2．AddItem str（b（i））
  If b（i）＜＞i  Then flag=False Next i
  If flag=True Then Text2．Text=“yes“Else Text2．Text=“no“End Sub
  组卷：8引用：1难度：0.1

  解析