2018-2019學年浙江省名校協(xié)作體高三（上）月考信息技術試卷（9月份）

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

• 1．下列有關信息的說法，正確的是（　?。?/h2>

  A．信息經過加工和處理后的使用價值始終保持不變

  B．信息可以脫離載體而存在

  C．信息在使用過程中會產生損耗

  D．手機屏幕鎖功能，可以提升信息的安全性
  組卷：9引用：1難度：0.8

  解析

• 2．下列有關瀏覽器與網頁、網絡協(xié)議的說法，正確的是（　?。?/h2>

  A．選擇“網頁，僅HTML”方式保存網頁，網頁中的圖片同時被保存

  B．保存網頁其實就是保存網頁的URL

  C．網頁內容是通過HTTP語言描述的

  D．SMTP協(xié)議是簡單郵件傳輸協(xié)議的英文簡稱
  組卷：1引用：2難度：0.5

  解析

• 3．使用word編輯某文檔，部分界面如圖所示，以下說法正確的是（　?。?img alt="菁優(yōu)網" src="https://img.jyeoo.net/quiz/images/201810/68/aa31eab7.png" style="vertical-align:middle" />

  A．若將文檔中圖片的環(huán)繞方式改為“緊密型”后效果不變

  B．刪除批注對話框中“摘自《遺傳密碼》”后該批注框消失

  C．文中的“美夢承真”可通過自動更正功能改為“美夢成真”

  D．接受所有修訂后，第四行將變成“毫發(fā)無損。有魔術表演的夜晚總是那么歡樂?！?/label>
  組卷：7引用：1難度：0.6

  解析

• 4．使用Access軟件創(chuàng)建一張數據表，其設計視圖界面如圖所示，下列說法正確的是（　?。?img alt="菁優(yōu)網" src="https://img.jyeoo.net/quiz/images/201810/68/63414c01.png" style="vertical-align:middle" />

  A．當前狀態(tài)下，可以對數據表“圖書信息”重命名

  B．該視圖中，右表刪除一行，則其數據表的記錄總數會相應減少一條

  C．在“圖書信息”數據表中，可以包含圖書名稱相同的兩條記錄

  D．存儲“借出”字段值需要1個字節(jié)
  組卷：5引用：1難度：0.4

  解析

• 5．使用UltraEdit軟件觀察字符內碼，結果如圖所示。
  
  以下說法正確的是（　?。?/h2>

  A．圖中內碼表示的ASCII碼字符共有5個

  B．字符“F”內碼轉十進制過程應為4×162+6×161

  C．字母“j”內碼用十六進制表示是70

  D．字母“B”內碼用二進制表示是1000010
  組卷：1引用：1難度：0.5

  解析

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

• 16．小王設計了一個算法試圖求出平面坐標系中最左點出發(fā)，從左往右途經所有點到達最右點的路徑值和，編寫了一個VB程序功能如下：在文本框Text1中輸入需隨機生成的坐標點數量，單擊“生成”按鈕Command1后，在列表框List1中生成相應數量的坐標點（坐標值為大于等于1小于10的實數，保留一位小數），在文本框Text2中輸出路徑值。程序界面如圖所示。
  實現上述功能的VB程序如下，但加框處代碼有錯，請改正。
  Private Sub Command1_Click （　?。?br />     Dim x（1To 100）As Single,y（1To 100）As Single
       Dim tmp As Single,length As Single,sum As Single,x1As Single,y1As Single
      Dim i As Integer,j As Integer,k As Integer
  Randomize
  List1．Clear
       k=Val（Text1．Text）
       For i=1To k
      x（i）=Int（Rnd*90）/10+1
        y（i）=Int（Rnd*90）/10+1
         List1．AddItem“X：“+Str（x（i））+““+“Y：“+Str（y（i））
  Next i
  For i=1To k-1
        For j=1To k-i
             If x（j）＞x（j+1）Then
                x（i）=x（i）+x（j）
                x（j）=x（i）-x（j）
            
              tmp=y（j）
              y（j）=y（j+1）
             y（j+1）=tmp
           End If
        Next j
  Next i
  sum=0：length=0
  For i=1To k-1
           x1=
  '變量y1計算方法同x1，代碼略
  
  
          length=Sqr（x1+y1）
          sum=sum+length
      Next i
  Text2．Text=Str（Int（sum*10）/10）
  End Sub
  組卷：0難度：0.9

  解析

• 17．某密碼的破譯步驟如下：
  （1）找出文章（以“。”結束）中所有用英文表示的數字（均為小寫，數字范圍1≤n≤20），單詞與數字對應如下：
  

  單詞	one	two	three	four	five	six	seven	eight	nine	ten	……	twenty
  數字	1	2	3	4	5	6	7	8	9	10	……	20

  （2）將這些數字平方后除以100取余，得到兩位數如00，04，21，96。
  （3）把這些兩位數按升序排成一行，組成一個最小的新數，如果新數開頭為0，就去除。
  （4）步驟（3）找出的最小數即為密碼。
  小明按照上述方法，設計了一個解密的VB程序，功能如下：單擊“解密”按鈕Commandl,程序依次將文本框Textl中以空格分隔的每個英文單詞取出，若單詞屬于數字單詞，則按解密步驟進行處理，最后在文本框Text2中輸出解密結果。程序運行效果如圖所示，請回答下列問題：
  
  （1）若文章內容為“tom bought two apples and five oranges,which cost ten dollars altogether?！?，則破譯后的密碼應為

   

  。
  （2）請在橫線處填入合適的代碼。
  Dim a（1To 20）As String
  Private Sub Form_Load （　?。?br />a（1）=“one“：a（2）=“two“
  '……將所有數字單詞按順序存入數組a中，代碼略
  End Sub
  Private Sub Command1_Click （　　）
  Dim s As String,tmp As String
  Dim c as Integer,i As Integer,j As Integer,k As Integer,t As String,ch As As String,code As Long
  Dim b（1To 100）As String'b數組存放數字單詞處理后得到的兩位數
  s=Text1．Text
  c=0：i=1：flag=True：t=““
  Do While i＜=Len（s）
  ch=Mid（s,i,1）
  If ch＞=“a“And ch＜=“z“Then
     t=t+ch
  flag=False
  ElseIf flag=False Then
  For j=1To 20
  If t=a（j） Then
  c=c+1
  b（c）=

   

  
  End If
  Next j
  t=““
  flag=True
  End If
  i=i+1
  Loop
  ’將b數組中的兩位數按數值大小進行升序排序，代碼略
  For i=1To c
  t=Val（b（i））
  

   

  
  Next i
  Text2．Text=Str（code）
  End Sub
  Function decode（num As Integer） As String
  Dim mo As Integer
  mo=num*num Mod 100
  If mo=0Then
  decode=“00“
  ElseIf

   

  Then
  decode=“0“+Trim（Str（mo））
  Else
  decode=Trim（Str（mo））'Trim為去除字符串兩端空格的函數
  End If
  End Function
  組卷：2引用：1難度：0.5

  解析