2017-2018學年浙江省溫州市十五校聯(lián)合體高二（下）期末信息技術試卷

一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個備選項中只有一個符合題目要求的，不選、多選、錯選均不得分）

• 1．下列有關信息的說法，不正確的是（　　）

  A．物質、能源和信息是人類社會的三大要素

  B．微信朋友圈主要體現(xiàn)了信息的傳遞與共享性

  C．從出土文物推斷當時社會的發(fā)展水平，這主要體現(xiàn)了信息的載體依附性

  D．天氣預報說明天下雨，結果卻是晴天，這說明天氣預報這種信息沒什么價值
  組卷：21引用：1難度：0.1

  解析

• 2．下列有關計算機網絡和安全的說法中，正確的是（　?。?/h2>

  A．發(fā)現(xiàn)電腦感染了計算機病毒，立即刪除可疑文件以清除病毒

  B．電子郵件中“密送”的目的是防止郵件在發(fā)送過程中丟失

  C．HTML 是超文本標記語言的簡稱，網頁文件可以用記事本進行編輯

  D．只要密碼長度足夠且復雜程度高，就沒有必要定期更改系統(tǒng)的密碼
  組卷：4引用：1難度：0.5

  解析

• 3．用 OCR 軟件進行字符識別，主要包括以下操作步驟：①保存 ②掃描 ③識別 ④傾斜校正 ⑤版 面分析⑥校對，其合理的操作順序為（　?。?/h2>

  A．②⑤④③⑥①

  B．②④⑤③⑥①

  C．②④⑤⑥③①

  D．②⑤④⑥③①
  組卷：11引用：1難度：0.8

  解析

• 4．某算法的部分流程圖如圖所示，執(zhí)行這部分流程后，輸出 a,b 的值分別是（　　）

  A．5，5

  B．8，11

  C．11，8

  D．11，17
  組卷：0引用：2難度：0.5

  解析

• 5．使用 Access 打開某數(shù)據(jù)庫，其部分界面如圖所示，下列 說法正確的是（　　）
  

  A．“缺考”字段屬于“是/否”類型

  B．該數(shù)據(jù)表一共有 7 個字段，8 條記錄

  C．當前打開的數(shù)據(jù)表名稱是“學生成績”表

  D．可以將該數(shù)據(jù)表的“考號”字段類型修改為“自動編號”
  組卷：3引用：1難度：0.4

  解析

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

• 16．若一個正整數(shù)從左向右讀與從右向左讀都一樣，我們就將其稱之為回文數(shù)。如 11、121 均是回文數(shù)。請你編寫程序，輸出 10 至 n 之間的所有回文數(shù)。程序運行界面如圖所示，在文本框 Text1 中輸入一個正整數(shù) n,單擊“查找”按鈕 Command1，在列表框 List1 中顯示 10-n 之間的所有回文數(shù)，并且在標簽 Label1 中輸出查找到回文數(shù)的總數(shù)。
  問題：實現(xiàn)上述功能的 VB 代碼如下，但加框處代碼有錯，請改正。 Private Sub Command1_Click（　?。?br />Dim n as long,sum as long,i As Long Dim x as long,y as long
  List1．Clear
  n=Val（Text1．Text） sum=0
  For i=10To n    
  y=0
  Do While x＞0 
  x=x\10
  Loop
  If y=i Then
  List1．additem  Str（i）
  sum=sum+1
  End if Next i
  Label1．caption=“共有”& Str（sum） &“個回文數(shù)”End Sub
  組卷：2引用：1難度：0.5

  解析

• 17．小王用 VB 編寫一個自動統(tǒng)計離散數(shù)據(jù)的“極大值”（如圖 a 所示）個數(shù)的程序。功能如下：在列表框 List1 中隨機產生 n 個介于[1，99]的正整數(shù)，單擊“統(tǒng)計極大值”命令按鈕 Command1，程序自動統(tǒng)計出極大值，并將其輸出到列表框 List2，且將其中的最大值輸出在標簽 Label1 中。程序界面如圖 b 所示，實現(xiàn)上述功能的 VB 程序如下。（假設：數(shù)據(jù)的左右兩個端點不 計入極大值，且相等的兩個值也不計入極大值）。請回答以下問題：
  
   （1）當 n=6，原始數(shù)據(jù)為“8 39 24 5 71 25”，此時極大值有：

   

  。
  （2）請在橫線處填入合適的代碼。Const n=10
  Dim a（1To n） As Integer'存儲原始數(shù)據(jù) Dim Max（1To n） As Integer'存儲極大值數(shù)據(jù)
  Private Sub Form_Load （　?。?原始數(shù)據(jù)初始化
  Randomize
  For i=1To n
  a（i）=

   

  '產生[1，99]間隨機整數(shù)
  List1．AddItem Str（a（i））
  Next i End Sub
  Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer
  Dim count As Integer,Maxa As Integer
  count=0
  List2．Clear
  For i=2To n-1'統(tǒng)計極大值，左右兩邊端點值除外
  If

   

  Then
  count=count+1
  

   

  =a（i）
  End If
  Next i
  Maxa=0
  For i=1To count
  List2．AddItem Str（Max（i））
  If Maxa＜Max（i） Then
  Maxa=Max（i）
  End If
  Next i
  Label1．Caption=“極大值中的最大值為：“+Str（Maxa） End Sub
  組卷：2引用：1難度：0.5

  解析