2018-2019學年浙江省嘉興市高三（上）選考信息技術試卷（9月份）

一、選擇題（本大題共12小題，每小題2分，共24分．在每小題給出的四個選項中，有一個符合題目要求）

• 1．下列關于信息和信息技術的說法正確的是（　　）

  A．用手機掃描二維碼，是對信息進行編碼的過程

  B．經常更新殺毒軟件的病毒庫，有助于提高計算機系統的安全性

  C．交警指揮交通必須采用規定的手勢，這是為了信息表達的形象化

  D．信息必須依附于某種載體，不可以脫離它所反映的事物被存儲和傳播
  組卷：1引用：1難度：0.6

  解析

• 2．閱讀某郵件的部分界面如圖所示，下列說法錯誤的是（　　）
  

  A．回復該郵件后，郵件將發往126．cOm服務器

  B．登錄該郵箱使用的是瀏覽器軟件

  C．收取郵件時可以使用POP3協議

  D．當前狀態下，收件箱中只有12封郵件
  組卷：5引用：1難度：0.5

  解析

• 3．使用OCR軟件識別文稿，并在word軟件中編輯。下列相關操作過程中應用了人工智能技術的是（　　）

  A．使用掃描儀掃描待識別文稿獲得其圖象文件

  B．使用OCR軟件從圖象文件中識別出文本

  C．使用word中“拼寫和語法檢查”功能自動檢查文稿中錯誤

  D．使用word中“字數統計”功能統計文稿中的字符數
  組卷：14引用：2難度：0.5

  解析

• 4．某 Access數據表編輯界面如圖所示，下列說法正確的是（　　）
  

  A．Access是數據庫應用程序

  B．數據表的名稱為“圖書。accdl”

  C．“編號”字段的值不會重復

  D．“貳拾捌元”是“定價”字段的有效輸入值
  組卷：0引用：1難度：0.5

  解析

• 5．某算法的部分流程圖如圖所示。執行這部分流程，下列說法正確的是（　　）
  

  A．第1次循環結束時，x值為125

  B．第1次循環結束時，y值為15

  C．循環結束后，輸出y的值為521

  D．循環結束后，x◇0部分執行了3次
  組卷：3引用：2難度：0.4

  解析

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

• 16．小王通過抽樣調查的方式，獲得了96人的信用分值（整數，大于349且小于950）。要求對其各個分段進行統計，并輸出分布最廣的3個分段及其個數和百分比，但不包含650-699這一段（此段為系統默認，屬于第7段）。分段說明：350～399分為第1段，400～449為第2段，450～499為第3段，以此類推，共分為12段。
  實現上述功能的ⅤB程序代碼如下，但加框處代碼有錯，請改正。
  Const n=96
  Dim d（I To n）As Integer
  Private Sub Command1_ Click（　　）
  Dim fd（1 To 12）As Integer'存儲每個分段內人數
  Dim a（1 To 12）As Integer'存儲每個分段內人數的副本
  Dim b（1 To 12）As Integer'存儲每個分段編號的副本
  Dim i As Integer,j As Integer,t As Integer,k As Integer
  Dim p As Single,templ As Integer,temp2 As Integer
  Fori=1 To n
  '①
  fd（i）=fd（t）+1
  Next i
  Fo  i=I To 12
  a（i）=fd（i）：b（i）=i
  Next j
  For i=1 To 3'排序時第7段數據不參與排序
  k=i
  For j=i+I To 12
  IfThen k=j'②
  Next j
  Ifk◇i Then
  templ=a（i）：a（i）=a（k）：a（k）=templ
  emp2=b（i）：b（i）=b（k）：b（k）=temp。
  End If
  Next i
  For i=1 To 3
  p=Int（a（i）/n*1000+0.5）/10'百分比，保留一位小數
  List.AddItem“分數段”+Str（b（i））+“個數”+Str（a（i））+“百分比”+Str（p）+“%”
  Next i
  End Sub
  Private Sub Form _Load（　　）
  '獲取n個人的“信用分”，并存儲在數組d中
  '代碼略
  End sub
  組卷：0引用：1難度：0.5

  解析

• 17．小明編寫了一個有關整數閉區間合并操作的VB程序：從數據庫讀取閉區間數據（左端點和右端點），存儲在數組a中，按區間數據左端點升序排序，然后進行合并操作操作結果存儲在數組b中。
  例如，讀取的數據為2、3、15、25、10、14、1、5、30、60、15、25，過程是：
  （1）設置區間信息為[2，3]，[15，25]，[10，14]，[1，5]，[30，60]，[15，25]，[30，60]；
  （2）按區間左端點升序排序，得到區間信息為[1，5]，[2，3]，[10，14]，[15，25]，[15，25]，[30，60]
  （3）合并區間，得到[1，5]，[10，25]，[30，60]．說明：區間[1，5]和[2，3]合并為[1，5]，區間[0，14]和[15，25]合并為[′0，25]，區間[10，25]和[15，25]合并為[10，25]，因此合并后的結果為：[1，5]，[10，25]，[30，60]三個區間。
  程序功能如下：單擊“讀數據庫”按鈕 Commandl,程序從數據庫讀取數據，輸出在文本框Tex1中；單擊“開始處理”按鈕 Command2，程序進行區間排序，并進行區間合并操作，操作后的結果輸出在文本框Text2中。程序運行結果如圖所示。
  
  實現上述功能的ⅴB程序如下，請回答下列問題：
  （1）從數據庫中讀入的區間為“[1，10]，[15，20]，[6，18]，[25，30]，[31，200]”，則合并操作后的區間為

   

  。
  （2）請在橫線處填入合適的代碼。
  Dima（1To100）As Integer'數組a存儲合并前的區間
  Dimb（1To100 ）As Integer'數組b存儲合并后的區間
  Dim n as integer'n表示區間個數
  Private Sub Command1_ Click（　　）
  Dim sl As String,i As Integer
  '讀取數據，并存儲到數組a中，并輸出在文本框Text1中，代碼略
  End Sub
  Private Sub Command2_ Click（　　）
  Dim s2 As String,i As Integer,j As Integer,k As Integer
  Dim n As Integer,t as Integer,x As integer
  For  i=1 To n-1
  For  j=1 To 2*n-2*Step 2
  If

   

  Then
  t=a（j）：a（j）=a（j+2）：a（j+2）=t
  t=a（j+1）：a（j+1）=a（j+3）：a（j+3）=t
  End If
  Next j
  Next i
  k=2
  b（1）=a（1）：b（2）=a（2）
  i=2：j=3
  Do while j＜=2*n
  If b（i）＞=a（j）Then
  If b（i）＜=a（j+1）Then

   

  
  Elself b（i）+1=a（j） Then
  b（k）=a（j+1）
  Else
  k=k+1：

   

  
  k=k+1：b（k）=a（j+1）
  End If
  j=j+2
  Loop
  For x=1 To k-2 Step 2
  s2=s2&“[“&b（x）&“，“&b（x+1）&““]&“]“，“
  Next
  s2=s2&“[“&b（x）&“，“&b（x+1）&““]&“]“，“
  Text2．Text=s2
  End Sub
  組卷：0引用：1難度：0.4

  解析