2019年4月浙江省普通高中學(xué)考選考信息技術(shù)模擬試卷

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

• 1．下列關(guān)于信息與信息安全的說法正確的是（　?。?/h2>

  A．物質(zhì)、能源、信息是人類社會的三大要素，使用過程中都會有損耗

  B．二維碼中可能包含手機(jī)病毒、釣魚網(wǎng)站等相關(guān)信息

  C．計(jì)算機(jī)病毒主要通過網(wǎng)絡(luò)傳播，只要不上網(wǎng)就不會感染計(jì)算機(jī)病毒

  D．信息技術(shù)的發(fā)展對人類社會產(chǎn)生了巨大變革，虛擬現(xiàn)實(shí)技術(shù)使信息脫離載體被表示
  組卷：28引用：5難度：0.5

  解析

• 2．下列關(guān)于因特網(wǎng)信息表達(dá)與評價的說法正確的是（　?。?/h2>

  A．網(wǎng)頁是有HTTP語言編寫的，可以由記事本、FrontPage等軟件編輯

  B．統(tǒng)計(jì)評價是網(wǎng)絡(luò)信息評價的主要方式之一，評價結(jié)果是真實(shí)可信的

  C．使用瀏覽器收藏網(wǎng)頁，實(shí)際上是保存的時網(wǎng)頁的URL

  D．將網(wǎng)頁以“Web檔案，單個文件（*．mht）”類型保存，其中的圖片未被保存
  組卷：43引用：1難度：0.4

  解析

• 3．下列關(guān)于字處理的相關(guān)說法正確的是（　　）

  A．在Word軟件中，將批注的內(nèi)容刪除后，批注框會被保留

  B．在Word軟件中，關(guān)閉“修訂”功能后，原有的修訂記錄會自動隱藏

  C．在Word軟件中，將圖片設(shè)置為“嵌入型”，則可使得文字環(huán)繞圖片的四周

  D．在Word軟件中，“自動更正”功能可以自動更正錯別字，屬于人工智能技術(shù)
  組卷：33引用：1難度：0.5

  解析

• 4．某商場將采用“會員管理系統(tǒng)”管理客戶的信息，會員信息表如下
  

  會員編號	姓名	積分	性別	余額	出生日期
  V101	張小明	461	男	￥820.0	1999-12-21
  P103	李小紅	5000	女	￥786.0	2000-01-24
  ……	……	……	……	……	……

  若用Access數(shù)據(jù)表“會員信息”來存儲上述表的信息，下列說法錯誤的是（　　）

  A．“會員管理系統(tǒng)”是一個數(shù)據(jù)庫應(yīng)用系統(tǒng)

  B．“會員編號”字段可以設(shè)置為“文本”類型

  C．為了便于信息管理，應(yīng)將“姓名”字段設(shè)置成該表的主鍵

  D．在設(shè)計(jì)“會員信息”表時，需要考慮表與表之間的關(guān)系
  組卷：21引用：1難度：0.4

  解析

• 5．某算法的部分流程圖如圖所示，執(zhí)行這部分流程，則輸出m,n,i的值依次為（　?。?img alt="菁優(yōu)網(wǎng)" src="http://img.jyeoo.net/quiz/images/201904/179/850543b3.png" style="vertical-align:middle" />

  A．3  14  7

  B．0  20  7

  C．0  15  6

  D．3  15  7
  組卷：6引用：1難度：0.5

  解析

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

• 16．數(shù)組a中存儲的是一組正整數(shù)，特征是：①以三個數(shù)為一組的話，每組中任意一個數(shù)都比前面一組中的任意一個數(shù)要大；②每組中三個數(shù)依次遞減；③數(shù)組中數(shù)的總個數(shù)為3的倍數(shù)。依據(jù)對分查找思想，設(shè)計(jì)一個在數(shù)組a中查找數(shù)據(jù)key的程序。實(shí)現(xiàn)該功能的VB程序如下，但加框處代碼有錯，請改正。
  
  Private Sub Command1_Click （　?。?br />Const n=15
  Dim a（1 To n） As Integer,search As Integer,key As Integer
  Dim i As Integer,j As Integer,m As Integer
  '讀取一組正整數(shù)，按上述規(guī)則存入數(shù)組a中，代碼略。
  key=Val（Text1．Text）
  i=1：j=n：search=0
  Do While i＜=j
  m=（i+j）\2
  If m Mod 3＜＞0 Then m='（1）把m調(diào)整到三個一組的最后一個數(shù)的位置
  If key=a（m） Then
  search=m：Exit Do
  ElseIf key＜a（m） Then
  j=m-3
  ElseIf  Then'（2）
  i=m+1
  ElseIf key=a（m-2）Then
  search=m-2：Exit Do
  ElseIf key=a（m-1）Then
  search=m-1：Exit Do
  Else
  search=0：Exit Do
  End If
  Loop
  If search＜＞0 Then
  Text2．Text=Str（search）
  Else
  Text2．Text=“找不到“
  End IfEnd Sub
  組卷：5引用：1難度：0.4

  解析

• 17．小胡收集了2018屆高三學(xué)生高考成績及相關(guān)的選科情況，存入數(shù)據(jù)庫中，部分界面截圖如圖所示：
  
  程序功能如下：
  在窗體加載時，從數(shù)據(jù)庫中讀取學(xué)生總數(shù)N；讀取N名學(xué)生的信息存儲在相關(guān)數(shù)組中。N名學(xué)生的學(xué)號依次存儲在數(shù)組xh（1）～xh（n） 中；學(xué)號為i的學(xué)生的總成績存儲在數(shù)組 zf（i）中，課程選修信息存儲在xk（i）中；
  點(diǎn)擊“統(tǒng)計(jì)”按鈕后，程序篩選出所有技術(shù)考生的相關(guān)信息，并計(jì)算該學(xué)生在所有技術(shù)考生中的排名（總分相同的，排名也相同）。
  實(shí)現(xiàn)上述功能的VB程序如下，請回答下列問題：
  （1）請?jiān)跈M線處填入合適的代碼。
  Dim xh（1 To 1000）As Integer’數(shù)據(jù)庫中讀取時第i為學(xué)生的學(xué)號存儲在xh（i）
  Dim zf（1 To 1000）As Integer’學(xué)號為i的考生的總分存儲在zf（i）
  Dim xk（1 To 1000）As String’學(xué)號為i的考生的選考課程信息存儲在zf（i）
  ’數(shù)據(jù)格式**-**-**（如：物理-化學(xué)-生物）
  Dim jspm（1 To 1000）As Integer’學(xué)號為i的技術(shù)選考生的總分在所有技術(shù)考生中的
  ’排名存儲在數(shù)組jspm（i）
  Private Sub Form_Load （　?。?br />Dim conn   As New ADODB．Connection
  Dim rs As New ADODB．Recordset
  Dim  constr  as string,sql as string
  Constr=“Provider=Microsoft.ace.OLEDB.12.0；“
  Constr=constr &“Data Source=“& App.Path+“\data\stu2018．a(chǎn)ccdb“
  conn.ConnectionString=constr
  conn.open （　　）
  rs.Open“select*from 2018cj“，conn
  i=0
  Do While Not rs.EOF
  i=i+1
  xh（i）=rs（“xuehao”）
  zf（rs（“xuehao”））=rs（“fenshu”）
  xk（rs（“xuehao”））=rs（“xkinfo”）
  

   

  
  Loop
  N=i
  End Sub
  ’判斷選科信息info中是否包含科目km
  Function YouKM（ByVal km As String,ByVal Info As String） As Boolean
  Dim km1 As String
  YouKM=False
  For i=1 To 3
  If

   

   Then
  YouKM=True
  Exit For
  End If
  Next i
  End Function
  '為技術(shù)學(xué)科考試求名次
  Private Sub Command1_Click （　?。?br />Dim jsinfo（1 To 1000）As Integer’依次存儲每個技術(shù)選考生的學(xué)號和成績
  Dim k as integer’存儲找到的技術(shù)選考學(xué)生的數(shù)量
  '將所有選考“技術(shù)”的考生學(xué)號、成績依次存入數(shù)組jsinfo中
  k=0
  For i=1 To n
  If

   

  Then
  k=k+1
  jsinfo（2*k-1）=xh（i）
  jsinfo（2*k）=cj（xh（i））
  End If
  Next i
  '學(xué)號為i的學(xué)生在技術(shù)選考生中的排名，存入jspm（i）中
  For i=1 To k
  mc=0
  For j=1 To k
  If jsinfo （2*j）＞jsinfo （2*i） Then mc=mc+1
  Next j
  jspm（jsinfo（2*i-1））=

   

  
  Next i
  '輸出所有技術(shù)考試的學(xué)號、成績、技術(shù)排名信息  代碼略
  End Sub
  組卷：6引用：1難度：0.4

  解析