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

          2018-2019學年浙江省湖州市吳興區菱湖中學高三(上)月考信息技術試卷(12月份)

          發布:2024/11/13 18:0:2

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

          • 1.下列有關信息的說法錯誤的是(  )

            組卷:20引用:2難度:0.9
          • 2.關于網頁與網絡應用術語縮寫,下列說法不正確的是(  )

            組卷:0引用:2難度:0.4
          • 3.使用Word軟件編輯某文檔,部分界面如圖所示。

            下列說法正確的是(  )

            組卷:9引用:4難度:0.5
          • 4.使用 Access 軟件創建一張數據表,其設計視圖如圖所示。

            下列說法正確的是(  )

            組卷:11引用:3難度:0.4
          • 5.某算法的部分流程圖如圖所示,執行這部分流程后,變量x和Flag的值分別是(  )

            組卷:9引用:11難度:0.7

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

          • 16.有一組正整數,要求對其中的數據進行排列,排列后奇數在前,偶數在后。其中最后一個數據排到奇數與偶數交接處;自前到后的第一個偶數排到最后一個位置,空出的位置排列自后向前的第一個奇數,依此類推。排序示例如下。
            排序前 71 85 64 55 42 62 33 17 34 30
            排序后 71 85 17 55 33 30 62 42 34 64
            實現上述功能的 VB 程序如下,但加框處代碼有錯,請改正。
            Const n=10
            Dim a(1 To n) As Integer
            Private Sub Command1_Click (  )
            Dim i As Integer,j As Integer
            Dim temp As Integer,flag As Boolean
            '讀取一組正整數,存儲在數組 a 中,代碼略
            i=1:j=n
            temp=a(j):flag=True
            Do While i<j
            If flag Then
            If =0 Then
            a(j)=a(i)
            j=j-1
            flag=Not flag
            Else
            j=j-1'(1)
            End If

            If a(j) Mod 2=1 Then
            a(i)=a(j)
            flag=Not flag
            Else
            j=j-1
            End If
            End If
            Loop
            a(i+j)=temp'(2)
            '依次輸出排序后的數據,代碼略。
            End Sub

            組卷:0引用:1難度:0.3
          • 17.n堆金幣,把兩堆金幣合并到一起,n堆金幣經過n-1次合并之后就只剩下一堆了。如何消耗最少的體力,把這n堆金幣合并成一堆?合并所消耗的體力等于每次合并兩堆金幣的重量之和。比如,n=3時表示共有3堆金幣,每堆重量分別是2、1、9.一種合并方案是2和9合并,新堆重量是11,消耗體力為11;接著11和1合并,新堆重量是12,消耗體力為12,因此總消耗體力是11+12=23.另一種方案是:1和2合并,新堆重量是3,消耗體力為3;接著3和9合并,新堆重量是12,消耗體力為12,因此總消耗體力是3+12=15.可以證明這就是最少消耗體力。

            小張經分析,每次n堆金幣如果都是從小到大,將前兩堆合并成新一堆,然后,繼續進行從小到大排序,如此合并成最后一堆,此時消耗體力最少,為此他編寫了一個解決上述問題,求最少體力的VB程序,功能如下:窗體加載時,自動讀取n堆金幣的數據,依次存儲在數組元素a(1)、a(2)、a(3)…中,金幣堆數存儲在變量n中,n堆金幣的重量數據顯示在列表框List1中。單擊“求解”按鈕Command1,程序對n堆金幣進行合并處理,消耗最少的體力顯示在文本框Text1中。程序運行界面如第17題圖所示。
            (1)如果有5堆金幣,每堆重量分別是12、8、5、9、15,則將這5堆金幣合并成一堆金幣,最少消耗體力是
             

            (2)實現上述功能的VB程序如下,請在橫線處填入合適的代碼。
            Const n=10
            Dim i As Integer,j As Integer,t As Integer
            Dim a(1 To n) As Integer
            Private Sub Form_Load (  )
            '本過程用于讀取n堆的數據并存儲在數據a中
            '代碼略
            End Sub
            'sort(x)過程的功能是對a(x)、a(x+1)、……、a(n)中的數進行從小到大排序
            Private Sub sort(x As Integer)
            For i=
             
            To n-1
            For j=n To i+1 Step-1
            If a(j)<a(j-1)Then
            t=a(j):a(j)=a(j-1):a(j-1)=t
            End If
            Next j
            Next i
            End Sub
            Private Sub Command1_Click (  )
            Dim sum As Integer,k As Integer
            sum=0
            sort (1)
            For k=1 To n-1
            a(k+1)=a(k)+a(k+1)
            sum=sum+
             

            sort (
             

            Next k
            Text1.Text=Str(sum)
            End Sub

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