試卷征集
          加入會員
          操作視頻
          當前位置: 試卷中心 > 試卷詳情

          2017年浙江省寧波市高考信息技術試卷

          發布:2024/4/20 14:35:0

          一.選擇題(每題2分)

          • 1.市民首次登錄iNingbo免費WIFI熱點,需要用手機獲取驗證碼并注冊,對驗證碼進行驗證并判定是否注冊成功這一過程屬于(  )

            組卷:9引用:2難度:0.9
          • 2.用Word軟件編輯某文檔,部分界面如圖所示. 下列有關圖中批注與修訂的說法,不正確的是(  )

            組卷:10引用:1難度:0.9
          • 3.某網頁包含下列元素:①文字②圖片③超鏈接④動畫⑤背景音樂,保存網頁時部分界面如圖所示,則保存下來的網頁內容包含(  )   

            組卷:7引用:1難度:0.9
          • 4.使用Access軟件創建一張數據表,其設計視圖如圖所示.在數據表視圖錄入數據時,下列操作能實現的是 (  )

            組卷:7引用:1難度:0.9
          • 5.某算法的部分流程圖如圖所示,執行該算法,輸出S的結果是(  )

            組卷:8引用:8難度:0.7

          二.非選擇題

          • 16.用VB編寫程序,在文本框Text1中輸入任意字符串s,統計s中數字字符串的數值和(如輸入字符串“ab123dr34fg9de”則輸出166,即123+34+9=166.)并在Labe13輸出結果.程序設計界面如下:
            根據算法將下列程序補充完整.
            Private Sub Command1_Click(  )
            Dim s As String,ch As String,s As Integer
            Dim ch2 As String,sum As Double
            Dim n As Integer,i As Integer
            s=Text1.Text
             

            i=1;sun=0
            Do While i=n
            ch=Mid(s,i,1)
            If ch>=“0“And ch<=“9“Then
            j=i
            ch2=Mid(s,j,1)
            Do While ch2>=“0“And ch2“9“
            j=j+1
            ch2=Mid(s,j,1)
            Loop
            sum=sum+
             

            i=j
            End If
            i=i+1
            Loop
            Label3.Caption=Str(sum)
            End Sub.

            組卷:15引用:3難度:0.1
          • 17.某字符串(字節數為3的倍數)編碼規則如下:(1)將該字符串內碼分成3個字節一組,順次連接后得到24位二進制數;
            (2)將得到的24位二進制數字分成4組,每組6個位;
            (3)在每組數字前補上兩個0,得到4個字節的二進制數;
            (4)將(3)中得到的四個二進制數分別轉化為十進制數;
            (5)將每個十進制數轉換為1個加密字符,對應的“密碼表”按數值由小到大依次為“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/”
            小明按照上述方法,設計了一個字符串(僅包含ASCⅡ字符)加密的VB程序,功能如下:單擊“加密按鈕”Command1,程序依次將文本框Text1中每3個字符的ASCⅡ碼值按編碼規則轉換為四個加密字符,連接這些加密字符,最后在文本框Text2中輸出加密結果.程序運行效果如圖所示.
            實現上述功能的VB程序如下:
            (1)在上述加密算法步驟(4)中,得到的十進制數最大是
            (2)實現上述功能的VB程序如下.請在橫線處填入合適代碼.
            Function Code2Char(c As Integer)As String
            Dim s As String
            s=“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/“
            Code2Char=
             

            End Function
            Private Sub Command1_Click(  )'加密過程
            Dim n As Integer,s As Integer,i As Integer,ss As String
            Dim a1 As Integer,a2 As Integer,a3 As Integer'存儲加密前字符的ASC碼
            Dim b1 As Integer,b2 As Integer'分別存儲分割、轉換后的前兩個十進制數
            Dim b3 As Integer,b4 As Integer'分別存儲分割、轉換后的后兩個十進制數
            s=Text1.Text
            n=Len(s)
            ss=““
            For i=1 To n
             

            a1=Asc(Mid(s,i,1))
            a2=Asc(Mid(s,i+1,1))
            a3=Asc(Mid(s,i+2,1))
            b1=a1\4
            b2=(a1 Mod4)*4+(a2\16)
            b3=
             

            b4=a3 Mod 64
            ss=ss+Code2Char(b1)+Code2Char(b2)+Code2Char(b3)+Code2Char(b4)
            Next i
            Text2.Text=ss
            End Sub.

            組卷:6引用:1難度:0.1
          APP開發者:深圳市菁優智慧教育股份有限公司| 應用名稱:菁優網 | 應用版本:5.0.7 |隱私協議|第三方SDK|用戶服務條款
          本網部分資源來源于會員上傳,除本網組織的資源外,版權歸原作者所有,如有侵犯版權,請立刻和本網聯系并提供證據,本網將在三個工作日內改正