2016-2017學年浙江省溫州新力量聯盟高二（下）期末信息技術試卷

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

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

  A．信息的來源不同導致獲取的方法也存在差異

  B．通過 POP3 協議可將電子郵件發送到對方服務器

  C．將有用的網址添加到收藏夾，就可方便地記錄網址

  D．采用“指紋+密碼”方式進行網上支付，可提高信息的安全性
  組卷：12引用：2難度：0.9

  解析

• 2．下列關于網站和網頁的說法，正確的是（　　）

  A．網頁標題指的就是網頁的文件名稱

  B．Internet Explorer 瀏覽器可對網頁進行編輯

  C．網頁中的元素只能是文字、圖形圖象和超鏈接

  D．HTTP 協議可將 WEB 服務器中的數據傳輸到瀏覽器
  組卷：8引用：2難度：0.9

  解析

• 3．使用 OCR 軟件進行字符識別，部分界面如圖所示
  
  下列說法不正確的是（　　）

  A．掃描件“江南小鎮．JPG”傾斜度過大會影響識別率

  B．待識別對象的文件類型可以是 JPG、BMP 和 TIF 等

  C．單擊相似字“0 哪”可將①處文字修改為“哪”字

  D．②處顯示的是“江南小鎮．TXT”的部分內容，可被編輯
  組卷：9引用：2難度：0.9

  解析

• 4．使用 Access 軟件創建的“無人機”數據表，其設計視圖的部分界面如圖所示．下列說法 正確的是（　　）

  A．“序號”字段的字段值可被修改

  B．當前狀態下，可新建一條記錄

  C．能在“優惠”字段輸入“是”

  D．可對“價格”字段名進行修改
  組卷：4引用：2難度：0.7

  解析

• 5．某算法的部分流程圖如圖所示，輸入a 的值 23，執行這部分流程后，變量 s 的值是（　　）
  

  A．1110

  B．1011

  C．10111

  D．11101
  組卷：15引用：4難度：0.9

  解析

【加試題】

• 16．素數是只能被 1 和它本身整除的數．小明編寫了一個 VB 程序實現將某個偶數拆成兩個素數之和．拆分方法如下：
  ①先將偶數拆分成兩個數之和，例如將 50 拆分為：3+47，4+46、…47+3．
  ②再對每種組合中的兩個數分別進行素數判斷．
  在文本框 Text1 輸入一個偶數，單擊“拆分”
  按鈕 Command1 后，在列表框 List1 中顯示素數組合．
  程序運行界面如圖所示．
  
  實現上述功能的 VB 程序如下，但加框處代碼有錯，請改正． Private Sub Command1_Click （　　）
  Dim i As Integer,k As Integer i=Val（Text1．Text）
  For k=3To i\2
  If prime（k） And  Then List1．AddItem Str（k） &“+“& Str（i-k）
  End If
  Next k End Sub
  Function prime（x As Integer） As Boolean
  Dim j As Integer
  prime=True
  For j=2To Sqr（x）
  If =0Then
  prime=False
  Exit Function
  End If
  Next j
  End Function.
  組卷：6引用：1難度：0.1

  解析

• 17．公民身份號碼是特征組合碼，由十七位數字本體碼和一位校驗碼組成．排列 順序從左至右依次為：六位數字地址碼，八位數字出生日期碼，三位數字順序碼和一位數字 校驗碼．數字校驗碼的計算過程如下三步所示：
  ①對身份證號碼的前 17 位數字的權求和
  s=Sum（sfz（i）*jq（i）），i=1，…，17 其中，sfz（i）：表示第 i 位置上的身份證號碼數字值
  jq（i）：表示第 i 位置上的加權因子
  jq（1）至 jq（17）依次為：7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2
  ②求模 y
  y=s Mod 11
  ③通過模得到對應的校驗碼
  模（y）：0 1 2 3 4 5 6 7 8 9 10 校驗碼（jym）：1 0X 9 8 7 6 5 4 3 2
  小明編寫了一個驗證 18 位身份證校驗碼的 VB 程序，實現功能如下：單擊“校驗”按鈕 Command1，程序從數據庫讀取相關數據進行處理，在列表框 List1 中顯示身份證號碼及判斷 檢驗碼是否正確的結果．VB 程序運行界面如圖所示．
  
  實現上述功能的 VB 程序如下，請回答下列問題：
  （1）解決此問題所用的算法是

   

  ．（選填：解析算法或枚舉算法）
  （2）請在橫線處填入合適的代碼．
  Dim sfz（1To 100）As String'存放身份證號碼
  Dim jq（1To 100）As Integer'存放加權因子
  Dim jiegAs String'存放判斷結果
  Private Sub Form_Load （　　）
  '本過程從數據庫中讀取身份證號碼、加權因子分別存儲到數組 sfz、jq 中，存儲在相應 的數組中
  '代碼略
  End Sub
  Private Sub Command1_Click （　　）
  For i=1To n'變量 n 指的是從數據庫讀取的身份證號碼個數
  jieg=

   

   
  List1．AddItem sfz（i）+““+jieg
  Next i
  End Sub
  Function jy（sfz1As String） As String'對身份證的校驗碼進行校驗
  Dim s As Integer,y As Integer,r As Integer
  Dim djym As String
  jym=“10X98765432“
  For i=1To 17
  r=Val（Mid（sfz1，i,1））*

   

  
  s=s+r
  Next i
  y=s Mod 11
  djym=

   

  
  If djym=Mid（sfz1，18，1）Then
  jy=“正確！“
  Else
  jy=“錯誤！“
  End If
  End Function.
  組卷：7引用：1難度：0.1

  解析