2018-2019學(xué)年浙江省杭州市建人高復(fù)學(xué)校高三（上）第一次月考信息技術(shù)試卷

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

• 1．下列軟件中，可用于編輯視頻文件的是（　?。?/h2>

  A．Word	B．WinRAR
  C．Internet Explorer	D．會聲會影
  組卷：3引用：1難度：0.9

  解析

• 2．某網(wǎng)絡(luò)協(xié)議的功能是將瀏覽器發(fā)出的請求發(fā)送至 Web 服務(wù)器，并將服務(wù)器回應(yīng)的網(wǎng)頁傳回瀏覽器。該協(xié)議的名稱是（　　）

  A．POP3

  B．HTTP

  C．SMTP

  D．URL
  組卷：2引用：2難度：0.8

  解析

• 3．用Word編輯某文檔，操作界面如圖所示．則以下說法正確的是（　?。?br />

  A．文檔中共有3處修訂

  B．有2個(gè)用戶對文檔進(jìn)行了批注

  C．拒絕所有修訂后，圖中的批注都將被刪除

  D．接受修訂后，加框處內(nèi)容為“行酒令的方式五花八門．”
  組卷：11引用：2難度：0.9

  解析

• 4．使用Access軟件創(chuàng)建的“動(dòng)漫作品”數(shù)據(jù)表，其設(shè)計(jì)視圖的部分界面如圖所示。下列說法正確的是（　?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/201810/74/169c3214.png" style="vertical-align:middle" />

  A．該數(shù)據(jù)表中，不會有兩條記錄的“編號”字段值相等

  B．在“發(fā)行時(shí)間”字段中可以輸入“二十五日”

  C．“價(jià)格”字段的內(nèi)容只能是整數(shù)

  D．“編號”字段不能刪除
  組卷：6引用：1難度：0.3

  解析

• 5．如圖所示，從上到下5行分別對應(yīng)5個(gè)十進(jìn)制數(shù)：1，2，3，4，5．〇〇●〇〇●●〇表示的數(shù)是（　?。?/h2>

  A．38D

  B．D9H

  C．434D

  D．26H
  組卷：0引用：1難度：0.9

  解析

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

• 16．小王編寫了一個(gè)猜價(jià)格的VB程序，程序界面如圖所示。程序運(yùn)行時(shí)，在列表框List1中顯示20個(gè)隨機(jī)生成的在[150，250]之間的價(jià)格及其序號。在文本框Text1中輸入報(bào)價(jià)，單擊Command1“猜測”按鈕后，在Label3中輸出猜中價(jià)格對應(yīng)的序號。
  
  實(shí)現(xiàn)上述功能的VB程序如下，但加框處代碼有誤，請改正。
  Dim d（1To 20）As Integer
  Private Sub Form_Load（　?。?br />For i=1To 20'生成20個(gè)隨機(jī)價(jià)格
  ‘（1）
  Next i
  For i=1To 19
  For j=20To i+1Step-1
  If  d（j）＜d（j-1）Then
  t=d（j）：d（j）=d（j-1）：d（j-1）=t
  End If
  Next j
  Next i
  For i=1To 20
  List1．AddItem Str（i）+Str（d（i））
  Next i
  End Sub
  Private Sub Command1_Click （　?。?br />Dim baojia As Integer,i as integer,j as integer,t as integer,m as integer
  Randomize
  List1．Clear
  baojia=Val（Text1．Text）
  i=1
  j=20
  Do While i＜=j
  ‘（2）
  If  baojia=d（m） Then
  Label3．Caption=“猜中   第“+Str（i）+“個(gè)“
  Exit Do
  ElseIf  baojia＜d（m） Then
  j=m-1
  Else
  ‘（3）
  End If
  Loop
  End Sub
  組卷：2引用：1難度：0.5

  解析

• 17．某數(shù)據(jù)解密方法描述如下：對輸入的密文（由英文字母或阿拉伯?dāng)?shù)字組成的字符串）進(jìn)行解密，解密后輸出明文。解密時(shí)對密文中的每個(gè)字符進(jìn)行如下處理：
  （1）將該字符的ASCII碼轉(zhuǎn)換成對應(yīng)的8位二進(jìn)制；
  （2）將對應(yīng)的8位二進(jìn)制數(shù)進(jìn)行按位取反（1變0，0變1）；
  （3）將產(chǎn)生的8位二進(jìn)制數(shù)循環(huán)左移2次；
  
  （4）將最后產(chǎn)生的8位二進(jìn)制數(shù)轉(zhuǎn)換成對應(yīng)的十六進(jìn)制數(shù)。
  例如，密文小寫字母“d”通過上述解密算法解密后生成的明文是“6E”，信息加密過程如圖b所示。
  實(shí)現(xiàn)上述功能的VB程序如下：在文本框Text1中輸入密文，單擊“解密”按鈕Command1，程序?qū)γ芪臄?shù)據(jù)依次進(jìn)行解密處理，在文本框Text2中顯示解密后生成的明文。程序運(yùn)行界面如圖c所示。
  實(shí)現(xiàn)上述功能的VB程序如下，請回答下列問題：
  （1）如果輸入密文為小寫字母“a”，則解密后得到的明文是

   

  。
  （2）請?jiān)跈M線處填入合適代碼。
  Function jiemi（m As String） As String'將4位二進(jìn)制數(shù)轉(zhuǎn)換成相應(yīng)的十六進(jìn)制數(shù)
  Dim k As Integer,i As Integer
  Dim str As String
  str=“0123456789ABCDEF“
  k=0
  For i=1To 4
  k=k*2+Val（Mid（m,i,1））
  Next i
  

   

  
  End Function
  Private Sub Command1_Click （　?。?br />Dim ans As String,s As String,ch As String,ret As String
  Dim s1As String,s2As String
  Dim i As Integer,m As Integer,asc1As Integer,n As Integer
  s=Text1．Text
  ans=““
  For i=1To Len（s）
  ch=Mid（s,i,1）'取出第i個(gè)字符存入變量ch
  asc1=Asc（ch）
  ret=““
  For m=1To 8'完成解密步驟（1）和步驟（2）
  

   

  
  ret=n & ret
  asc1=asc1\2
  Next m
  ret=Mid（ret,3，6）+Mid（ret,1，2）'完成解密步驟（3）
  s1=jiemi（Mid（ret,1，4））
  

   

  
  ans=ans& s1 & s2'將第i個(gè)解密后的字符添加到變量ans的末尾
  Next i
  Text2．Text=ans
  End Sub
  組卷：2引用：1難度：0.5

  解析