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

          2017年浙江省名校信息技術仿真試卷(四)

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

          一、選擇題(本題共12個小題,每小題2分,共24分)

          • 1.以下行為不恰當的是( ?。?/h2>

            組卷:4引用:2難度:0.9
          • 2.小明要把信息作業上傳到教師機上.教師機的服務器地址為“FTP://10.133.22.110/”,地址中的“FTP”表示( ?。?/h2>

            組卷:7引用:4難度:0.9
          • 3.下列關于OCR光學字符識別軟件的應用說法正確的是( ?。?/h2>

            組卷:6引用:1難度:0.9
          • 4.某Access數據表編輯界面如圖所示,以下說法錯誤的是( ?。?/h2>

            組卷:13引用:9難度:0.7
          • 5.某算法的部分流程圖如圖所示,執行這部分流程后,變量sum的值為(  )

            組卷:4引用:2難度:0.5

          二、非選擇題

          • 16.小明編寫了一個VB程序,功能如下:在文本框Text1中輸入一段英文,并在文本框Text2中輸入英文段落中的某個單詞(或字符串),單擊“最大間距”按鈕(Command1)后,在文本框Text3中顯示該單詞在文中某兩次出現的最大間距,若只出現一次或不出現則顯示值為0.程序運行界面如圖所示:

            實現上述功能的VB程序如下:
            Private Sub Command1_Click ( ?。?br />Dim a(1To 1000)As String'數組a存儲文中出現該指定單詞(或字符串)的各個位置
            Dim s As String,c As String,ch As String
            Dim n As Integer,max As Integer,i As Integer
            s=Text1.Text
            c=Text2.Text
            n=0:Max=0
            For i=1To Len(s)-Len(c)+1
            ch=    ①
            If ch=c Then
            n=n+1
            a(n)=i
            If n>=2Then
            If a(n)-a(n-1)-Len(c)>Max Then Max=a(n)-a(n-1)-Len(c)
            End If
            End If
            Next i
            Text3.Text=
            End Sub
            (1)畫線處①應填入的是
             

            (2)畫線處②應填入的是
             

            組卷:5難度:0.3
          • 17.合唱隊列是按隊員的身高進行排列,形成中間高兩邊有序降低的隊形;例如有六個隊員“己、戊、丁、丙、乙和甲”的身高依次由小到大,則排列后的順序為“戊、丙、甲、乙、丁、己”.小李用VB編寫模擬“合唱隊列”程序,功能如下:在文本框Text1中輸入各隊員身高,輸入結束并回車,則輸入的各隊員身高分別存入數組a中;單擊“合唱隊列”按鈕Command1,對數組a的元素進行有序排列后,將各元素存入數組C中形成合唱隊列,并將結果顯示在文本框Text2中.程序運行界面如圖所示:

            實現上述功能的VB程序如下:
            (1)如果輸入各隊員身高為“190,191,194,179,166”,則合唱隊列的結果為
             

            (2)實現上述功能的VB程序如下,請在畫線處填入合適代碼.
            Dim a(1 To 20)As Integer
            Dim n As Integer
            Private Sub Text1_KeyPress(KeyAscii As Integer)
            '將輸入各隊員身高分別存入數組a中,隊員個數為n,代碼略!
            End Sub
            Private Sub Command1_Click ( ?。?br />Dim c(1To 20)As Integer
            Dim right As Integer,left As Integer,i As Integer
            For i=1To n-1
            For j=1To n-i
            If
             
             Then
            t=a(j):a(j)=a(j+1):a(j+1)=t
            End If
            Next j
            Next i
            ‘下列程序段實現數組C的合唱隊列
            m=(1+n)\2
            left=m:right=m
            c(m)=a(n)
            i=2
            Do While i<=n
            If  i  Mod 2=0  Then
            right=right+1
            c(right)=a(n-i+1)
            Else
             

            c(left)=a(n-i+1)
            End If
            i=i+1
            Loop
            s=
             

            For i=2To n
            s=s+“,“+Str(c(i))
            Next i
            Text2.Text=s
            End Sub.

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