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

          2017-2018學年浙江省紹興市諸暨中學高二(下)期中信息技術試卷

          發布:2024/11/3 11:30:2

          一、選擇題(本大題共9小題,每小題2分,共24分,每小題列出的四個備選項中只有一個是符合題目要求的,不選、錯選、多選均不得分.)

          • 1.“口說無憑”指的是說過的話無據可查,在進行重大交易時,往往要簽訂書面協議.主要體現了信息的(  )

            組卷:6引用:2難度:0.9
          • 2.下列關于瀏覽器和網頁的說法,正確的是(  )

            組卷:27引用:3難度:0.9
          • 3.使用UltraEdit軟件查看字符內碼,部分界面如圖所示:

            圖中內碼所對應的字符是(  )

            組卷:44引用:4難度:0.9
          • 4.使用 Access 軟件打開數據庫,數據表視圖如圖 a 所示,設計視圖如圖 b 所示,下列說法正確的是(  )

            組卷:32引用:3難度:0.9
          • 5.某算法的部分流程圖如圖所示,執行這部分流程后,輸出c的值是(  )

            組卷:2引用:3難度:0.9

          【加試題】

          • 16.【加試題】小李基于冒泡排序算法編寫了一個VB程序,功能如下:在文本框Text1中顯示排序前的數據,單擊“排序”按鈕Command1,在文本框Text2中顯示剔除重復數據后的升序排序結果。程序運行界面如圖所示。

            實現上述功能的VB程序如下,但加框處代碼有錯,請改正。
            Const n=10
            Dim a(1To n) As Integer
            Private Sub Command1_Click (  )
            Dim i As Integer,j As Integer,t As Integer
            Dim bottom As Integer
            '獲取排序前數據依次存儲在數組a中,并在文本框Text1中顯示。代碼略
            bottom=n
            i=1
            Do While i<=bottom-1
            For j=bottom To i+1Step-1
            If  Then
            t=a(j):a(j)=a(j-1):a(j-1)=t
            ElseIf a(j)=a(j-1)Then'相鄰兩個數據相等,進行剔除處理

            bottom=bottom-1
            End If
            Next j
            i=i+1
            Loop
            Text2.Text=““
            For i=1To bottom
            Text2.Text=Text2.Text+Str(a(i))
            Next i
            End Sub。

            組卷:28引用:3難度:0.3
          • 17.維吉尼亞密碼。如圖所示,分別用行和列表示待加密的字符(明文)和當前字符的密鑰,行和列的交叉點的字符即為加密后的結果(密文)。在加密時,密文與明文的字母大小寫形式保持一致,如:明文字母為大寫,則加密后的密文字母也為大寫;當密鑰長度不足時重復使用密鑰。
            例如:當明文M=HelloWorld,密鑰K=abc時,密文C=HfnlpYosnd.運算過程如下所示:
            明文:HelloWorld
            密鑰:abcabcabca
            密文:HfnlpYosnd
            依據上述算法描述設計了如下VB程序。請回答下列問題:
            (1)若明文是Jia,密鑰是Pass,則輸出的密文是:
             

            (2)請在橫線處填上合適的代碼
            Const MIN_ASC=65
            Function X2D(x As String) As String
            Dim s As String,zf As String,i As Integer
            s=““
            For i=1To Len(x)
            zf=Mid(x,i,1)
            If zf>=“a“And zf<=“z“Then
            s=s+①
             

            Else
            s=s+zf
            End If
            Next i
            X2D=s
            End Function
            Private Sub Command1_Click (  )
            Dim M As String,K As String,C As String,flag As Boolean
            Dim i As Integer,t As Integer,ch As Integer,pos As Integer,j As Integer
            M=Text1.Text'明文
            K=Text2.Text'密鑰
            t=Len(K)
            K=X2D(K)
            C=““
            For i=1To Len(M)
            ch=Asc(Mid(M,i,1))
            flag=False
            If ch>=97And ch<=122Then ch=ch-32:flag=True
            pos=②
             
            '密鑰的字符位置值
            If pos=0Then pos=t
            j=Asc(Mid(K,pos,1))'密鑰字符的ASCII值
            ch=ch-MIN_ASC
            j=j-MIN_ASC
            ch=③
             

            ch=ch+MIN_ASC
            If flag Then ch=ch+32'設置字母的大小寫形式
            C=C & Chr(ch)
            Next i
            Text3.Text=C
            End Sub

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