2016-2017學年浙江省新高考研究聯(lián)盟高三（上）第一次聯(lián)考信息技術(shù)試卷

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

• 1．下列有關(guān)信息的說法，不正確的是（　　）

  A．因特網(wǎng)上的任意信息應盡可能地經(jīng)過甄別后再使用

  B．網(wǎng)頁中使用文字、圖象、表格、超鏈接等方式表達信息

  C．在微信朋友圈分享自己的旅行見聞，這一過程主要屬于信息的獲取

  D．設(shè)置郵箱，限制郵件大小、類型以及過濾垃圾郵件，主要是為了提高信息的安全性
  組卷：17引用：6難度：0.9

  解析

• 2．使用瀏覽器軟件打開某網(wǎng)頁文件如圖所示．
  
  下列說法正確的是（　?。?/h2>

  A．該網(wǎng)頁文件名為“冬季養(yǎng)生食物．htm”

  B．該網(wǎng)頁文件本質(zhì)上是文本文件

  C．頁面中圖象被保存在djyssp.htm文件中

  D．頁面中圖象上沒有超鏈接
  組卷：5引用：4難度：0.9

  解析

• 3．評價某網(wǎng)絡(luò)新聞的部分界面如圖所示．
  
  圖中包含的評價方式有（　?。?/h2>

  A．個人推薦、統(tǒng)計評價

  B．個人推薦、核心刊物評價

  C．核心刊物評價、統(tǒng)計評價

  D．專家推薦、核心刊物評價
  組卷：4引用：1難度：0.9

  解析

• 4．使用Access軟件創(chuàng)建數(shù)據(jù)表，存儲如下表所示的圖書信息：
  

  編號	書名	作者	書價	出版時間	出版社
  SN-7208061644	追風箏的人	卡勒德?胡賽尼	￥28.90	2014-01-01	上海人民出版社

  則該數(shù)據(jù)表對應的結(jié)構(gòu)恰當?shù)氖牵ā　。?/h2>

  A．

  B．

  C．

  D．
  組卷：10引用：4難度：0.7

  解析

• 5．計算s=2+4+6+…+10的算法流程圖如圖所示．
  
  若要計算s=2×4×6×…×10，則上述流程圖中的“s←s+x,x←x+2”應改為（　?。?/h2>

  A．x←x+1，x←s×x	B．s←s×x,x←x+1
  C．x←x+2，s←s×x	D．x←s×x,x←x+2
  組卷：6引用：3難度：0.7

  解析

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

• 16．查找并刪除重復數(shù)據(jù)的算法是基于順序查找的優(yōu)化，主要思路是把待查數(shù)據(jù)的起點元素設(shè)置成查找關(guān)鍵字，然后從后往前查找，通過結(jié)束時停留的數(shù)據(jù)位置來判斷查找結(jié)果（即結(jié)束時若停留在數(shù)據(jù)序列的起點，表示數(shù)據(jù)序列中無重復數(shù)據(jù)；否則，存在重復數(shù)據(jù)，刪除該數(shù)據(jù)后繼續(xù)查找）．
  
  編寫VB程序，實現(xiàn)上述算法．程序功能如下：運行程序時，在列表框List1中顯示數(shù)組a中的原始數(shù)據(jù)；單擊“去重”按鈕（Command1），查找數(shù)組a中的重復數(shù)據(jù)并刪除，即相同的數(shù)據(jù)僅保留一個，并在列表框List2中輸出去重后的數(shù)組a中的數(shù)據(jù)，同時在標簽Label1中顯示刪除的數(shù)據(jù)總個數(shù)，運行效果如第16題圖所示．
  實現(xiàn)上述功能的VB代碼如下，但加框處代碼有錯，請改正．
  Const maxn=10
  Dim a（1To maxn） As Integer
  Private Sub Form_Load （　　）
  'maxn個數(shù)據(jù)存儲在數(shù)組a中，并在列表框List1中顯示
  '代碼略
  End Sub
  Private Sub Command1_Click （　　）
  Dim i As Integer,n As Integer'n用于存儲當前查找的數(shù)組長度
  Dim j As Integer,key As Integer'key用于存儲本次查找關(guān)鍵字的數(shù)據(jù)位置
  key=1：n=maxn
  Do While key＜=n
  i=n
  Do While  '（1）
  i=i-1
  Loop
  If i=key Then'找到重復數(shù)據(jù)，刪除；未找到，設(shè)定下一查找關(guān)鍵字
  key=key+1
  Else
  For j=i To n-1
  a（j）=a（j+1）
  Next j
  n=n-1
  End If
  Loop
  For i=1To n
  List2．AddItem a（i）
  Next i
  Label1．Caption=“共刪除重復數(shù)據(jù)：“&    &“個“'（2）
  End Sub.
  組卷：2引用：2難度：0.3

  解析

• 17．如果一個正整數(shù)從左到右讀與從右到左讀是一樣的，就稱它為回文式數(shù)（簡稱回數(shù)），如12321．“回數(shù)猜想”的主要思想是，對任意正整數(shù)，若它不是回數(shù)，則按下列算法即可獲得一個回數(shù)：
  （1）把該整數(shù)的數(shù)字順序顛倒，求得該數(shù)的逆序數(shù)；
  （2）將該整數(shù)和其對應的逆序數(shù)相加；
  （3）若相加結(jié)果不是回數(shù)，則將結(jié)果作為新的整數(shù)，返回步驟（1）．
  小林按照上述算法，設(shè)計了驗證回數(shù)猜想的VB程序（猜想次數(shù)不超過10次），程序功能如下：在文本框Text1中輸入一個正整數(shù)，單擊“驗證”按鈕（Command1），獲取文本框Text1中的數(shù)，當該數(shù)不是回數(shù)時，采用回數(shù)猜想的方法進行驗證，并在列表框List1中輸出每次驗證的過程，若驗證成功或驗證次數(shù)超過10次，則停止驗證，最后在列表框List1中輸出驗證結(jié)果．程序運行效果如圖所示．
  
  實現(xiàn)上述功能的VB程序如下：
  Private Sub Command1_Click （　?。?br />Dim t As String,a As Long,b As Long
  Dim count As Integer'count用于存儲回數(shù)猜想的驗證次數(shù)
  
  t=Text1．Text
  count=1
  Do While Check（t）=False And count＜=10
  a=Val（t）
  

   

  
  c=a+b
  List1．AddItem Str（a） &“+“& Str（b） &“=“& Str（c）
  count=count+1
  t=Str（c）
  Loop
  If Check（t） Then
  List1．AddItem“驗證成功！“
  Else
  List1．AddItem“10次內(nèi)未驗證成功！“
  End If
  End Sub
  '自定義函數(shù)Turn
  Function Turn（x As String） As Long
  Dim s As String,i As Integer
  s=““
  For i=Len（x） To 1Step-1
  s=s & Mid（x,i,1）
  Next i
  Turn=Val（s）
  End Function
  '自定義函數(shù)Check,檢查x是否為回文數(shù)
  Function Check（x As String） As Boolean
  Dim i As Integer
  Check=True
  For i=1To Len（x）\2Step 1
  If Mid（x,i,1）＜＞

   

  Then Check=False
  Next i
  End Function
  （1）程序代碼中，自定義函數(shù)Turn（x）的功能是

   

  ．
  （2）請在橫線處填入合適代碼．
  組卷：2引用：1難度：0.3

  解析