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

          2019-2020學年浙江省稽陽聯誼學校高三(上)月考信息技術試卷(11月份)

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

          一、選擇題(本大題共12小題,每小題0分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)

          • 1.下列有關信息和信息編碼的說法,正確的是(  )

            組卷:6引用:2難度:0.6
          • 2.下列關于網頁和網絡協議的說法,正確的是(  )

            組卷:0引用:1難度:0.6
          • 3.下列應用中,均體現了人工智能技術的是(  )
            ①某手機依設定的時間自動開啟夜覽模式
            ②通過掃描某商品的二維碼獲得價格
            ③用指紋鎖功能打開手機
            ④某主題餐館使用機器人代替人工送餐
            ⑤使用手機拍照功能獲取圖像

            組卷:1引用:2難度:0.6
          • 4.利用軟件UltraEdit觀察字符內碼,界面如圖所示,下列說法正確的是(  )

            組卷:2引用:1難度:0.5
          • 5.用Photoshop軟件制作“陌上花開”作品,部分界面如圖所示。當前狀態下,下列說法正確的是(  )

            組卷:0引用:1難度:0.4

          二、非選擇題(本大題共4小題,其中4分,8分,7分,第16小題7分,共26分。)

          • 15.大數據是當今最熱門的領域之一,小王同學利用VB設計了一個模擬大數據應用的程序。有10種商品,數組a存儲用戶是否購買了各種商品;某個用戶購買時,商品兩兩之間是否一起購買用另一個數組dsj來記錄;各數組元素的解釋如表所示。
            數組元素 數組元素的含義
            a(i) a(1)到a(10)依次存儲1號顧客購買商品1~商品10的記錄;
            a(11)至a(20)依次存儲號2顧客購買商品1~商品10的記錄;依次類推。
            數組a的某個元素的值為1,則表示某位顧客購買了某種商品,若為0則表示沒有購買該種商品。如a(6)=1表示1號顧客購買了商品6,a(6)=0表示未購買。
            b(i) dsj(1)~dsj(9)依次存儲商品1與商品2~商品10的關聯次數;
            dsj(10)~dsj(17)依次存儲商品2與商品3~商品10的關聯次數:依次類推。
            如dsj(5)=2表示商品1與商品6被同時購買過2次;
            如dsj(45)=4表示商品9與商品10被同時購買過4次。
            數組dsj中,若dsj(45)的值最大,則表示商品9和商品10的關聯次數最多。
            小王按照上述算法設計了VB程序,統計了20個用戶購買10種商品之間的關聯性,VB程序如下,部分界面如圖所示。

            Private Sub Cmd1_Click ____
            Dim a(1To200)As Integer'各個用戶原始的購買記錄
            Dim dsj (1To45)As Integer'統計商品之間的關聯次數
            Dim i As Integer,t As Integer,nc As Integer,j As Integer,max As Integer
            '數組a讀入數據并在列表框分行輸出,代碼略
            For i=1 To 20'20個用戶
            t=1
            For j=1 To 9'10個商品,共45種組合
            For k=j+1 To 10
            m=(i-1)*10
            a(j)*a
            If Then dsj(t)=dsj(t)+1

            Next k
            Next j
            Next i
            max=0
            For i=1 To 45
            If   ②Then
            max=dsj(i)
            maxi=i
            End If
            Next i
            t=9:nc=1
            Do While maxi>t

            t=t-1
            nc=nc+1
            Loop
            Text1.Text=“關聯最多的是商品“+Str(nc)+Str(maxi+nc)+“:“+Str(max)+“次“
            End Sub
            (1)將按鈕上的文字“統計”修改為“計算”,可在Form_Load過程中使用
             
            (單選,填字母)語句實現;
            A.Cmd1.Caption=“計算”B.Cmd1_Click=“計算”C.Command1.Text=“計算”
            (2)加框處代碼有錯,請改正;
            改正:
             

            (3)在程序橫線處填入合適代碼,使程序完整。
             

             

             

            組卷:2引用:2難度:0.3
          • 16.有多人在不同樓層要乘坐同一部電梯,所有人都是去往更高樓層,電梯初始位置為第一批用戶出發的樓層位置。電梯在運行時,上升一層需耗時3秒,在某一層停留時(含電梯初始位置和電梯結束位置),不論有多少人進出都算8秒。小馬同學利用上述算法編寫了一個VB程序,在列表框list1中顯示所有人的出發與到達樓層,按照出發樓層升序(出發樓層相同按到達樓層升序)排序,在列表框list2中輸出排序后結果,最后在文本框Text1中輸出電梯本次運行的總時間。程序運行界面如圖所示,回答下列問題:

            (1)若有5批用戶出發與到達樓層分別是“10-25、5-15、15-20、15-30、5-10”,按照上述電梯運行規則,則電梯本次運行的總時間為
             
            秒。
            (2)給橫線處填上合適代碼,使程序完整。
            Dim a(1To10)As Integer,b(1To10)As Integer
            Private Sub Command1_Click ____
            Dim i As Integer,time As Integer,k As Integer
            Dim c(1To20)As Integer,nc As Integer
            c(1)=a(1):nc=1
            For i=1 To 9'刪除起點重復數據后添加到數組c
            If a(i)<>a(i+1)Then
            nc=nc+1
             

            EndIf
            Next i
            Fori=1To10'刪除終點重復數據后添加到數組c
            k=nc
            Do While b(i)<c(k)
            k=k-1
            Loop
            lf  ②
             
            Then'非重復數據(新停靠樓層)添加到數組c
            For j=nc To k+1 Step-1
            c(j+1)=cj)
            Next j
            nc=nc+1
            c(j+1)=b(i)
            End If
            Next i
            time=(c(nc)-c(1))*3+nc*8
            Text1.Text=“總時間--“+Str(time)+“秒”
            End Sub
            Private Sub Form_Load
             

            '生成10批人的起止樓層,分別給數組a和b,并在列表框list1輸出,代碼略.
            For i=1 To 9
            For j=10 To i+1 Step-1
            If a(j)<a(j-1)Or③
             
            Then
            t=a(j):a(j)=a(j-1):a(j-1)=t
            t=b(j):b(j)=b(j-1):b(j-1)=t
            End If
            Next j
            Next i
            For i=1 To 10
            List2.AddItem Str(a(i))+Str(b(i))
            Next i
            End Sub

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