2018年4月浙江省普通高校招生选考信息技术试卷

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

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

  A．信息在计算机内部采用二进制代码表示

  B．只有最新的信息才具有价值

  C．只能借助计算机才能处理信息

  D．信息不能脱离它所反应的事物被存储
  组卷：11引用：2难度：0.6

  解析

• 2．超文本标记语言用于描述网页的内容，该语言的简称是（　　）

  A．WWW

  B．URL

  C．HTTP

  D．HTML
  组卷：9引用：3难度：0.8

  解析

• 3．使用某OCR软件进行字符识别，发现识别正确率较低，可能的原因有（　　）
  ①识别前没有进行倾斜校正
  ②识别前没有进行合理的区域划分
  ③识别前没有放大显示
  ④扫描原始文稿时设置的扫描分辨率较低

  A．①②③

  B．①②④

  C．①③④

  D．②③④
  组卷：9引用：4难度：0.4

  解析

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

  A．当前打开的数据文件名是“2016年。accdb”

  B．当前正在编辑的数据表中共有6条记录

  C．删除当前记录，原第4条记录“编号”字段值变为“3”

  D．可在“编号”和“地市”字段之间插入一个新的字段
  组卷：14引用：2难度：0.3

  解析

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

  A．bdoaMLNV

  B．填充颜色

  C．背景back

  D．技术abcd
  组卷：44引用：4难度：0.9

  解析

【加试题】

• 16．有一组正整数，要求供对其中的素数进行升序排序。排序后素数在前，非素数在后。排序示例如下。
  

  排序前	86	71	5	41	81	79	37	89
  排序后	5	37	41	71	79	89	86	81

  Const n=8
  Dim a（1 To n） As Integer
  Private Sub Command1_Click

   

  
  Dim i As Integer,j As Integer,k As Integer,t As Integer
  Dim flag As Boolean
  '读取一组正整数，存储在数组a中，代码略
  For i=1 To n-1
  
  If IsPrime（a（k）） Then flag=True Else flag=False
  For j=i+1 To n
  If IsPime（a（j）） Then
  If  Then
  k=j
  flag=True
  End If
  End If
  Next j
  If k＜＞i Then
  t=a（k）：a（k）=a（i）：a（i）=t
  End If
  If Not flag Then Exit For'Exit For表示退出循环
  Next i
  '依次输出排序后的数据。代码略
  End Sub
  Function IsPrime（m As Integer） As Boolean
  '本函数判断m是否是素数：是素数返回值为True,不是素数返回值为False
  '代码略
  End Function
  组卷：3引用：1难度：0.5

  解析

【加试题】

• 17．为分析数组a中各元素依次变化的情况，进行如下定义：
  •变化段：数组中相邻两个元素构成一个变化段。变化段有上升段（a（i）＞a（i-1））、下降段（a（i）＜a（i-1））和持平段（a（i）=a（i-1））。数组a中的n个元素可构成n-1个依次排列的变化段。
  •波峰：从上升段转到下降段形成一个波峰。波峰的起点是峰顶前所有连续上升段中的第1个，终点是峰顶后所有连续下降段中的最后1个。
  •对称波峰：上升段与下降段个数相同的波峰称为对称波峰。
  下图为一组数据的变化段及波峰示意图。
  
  现要求统计数组a各元素依次变化过程中“对称波峰”的个数。小李依据上述描述设计如下VB程序。请回答下列问题：
  （1）数组元素“1，4，3，3，2，6，8，7，9，3，4，7，9，6，3，1”依次变化过程中“对称波峰”的个数为

   

  。
  （2）请在横线处填入合适的代码。
  Const n=20
  Dim a（1 To n） As Integer
  Private Sub Form_Load （　　）
  '读取数据，并存储到数组a中，代码略
  End Sub
  Private Sub Command1_Click （　　）
  Dim flag As Integer'存储变化段的状态：1表示升，-1表示降，0表示平
  Dim count As Integer'存储对称波峰段的个数
  Dim steps As Integer
  Dim i As Integer
  flag=0：steps=0：count=0
  For i=①To n
  If a（i）＞a（i-1）Then
  If IsSymPeak（flag,steps） Then count=count+1
  If flag=0 Or flag=-1 Then
  ②
  Else
  steps=steps+1
  End If
  ElseIfa（i）=a（i-1）Then
  If IsSymPeak（flag,steps） Then count=count+1
  steps=0
  flag=0
  Else
  steps=steps-1
  flag=-1
  End If
  Next i
  If IsSymPeak（flag,steps） Then count=count+1
  Text1．Text=Str（count）
  End Sub
  Function IsSymPeak（flag As Integer,steps As Integer） As Boolean
  If ③ Then
  IsSymPeak=True
  Else
  IsSymPeak=False
  End If
  End Function
  组卷：0引用：1难度：0.9

  解析