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

          2019-2020學(xué)年浙江省紹興市諸暨市高二(下)期末信息技術(shù)試卷

          發(fā)布:2024/11/21 1:30:2

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

          • 1.小陳去某景點(diǎn)旅游,景點(diǎn)門票兩日內(nèi)有效,首次入園需驗(yàn)票(即掃描門票上的二維碼),然后采集人臉信息,若兩日內(nèi)再次入園只需人臉識別即可,下列說法正確的是(  )

            組卷:7引用:1難度:0.7
          • 2.小周到某科技館游玩,經(jīng)歷了下列事件,對于以上事件,下列選項(xiàng)中都體現(xiàn)人工智能技術(shù)應(yīng)用的是(  )
            ①使用紙質(zhì)地圖查找該科技館的位置
            ②安裝科技館APP下載中文導(dǎo)游圖
            ③向“人機(jī)對話”導(dǎo)游機(jī)器人詢問景點(diǎn)位置
             ④和機(jī)器人進(jìn)行象棋對弈
            ⑤在自動售貨機(jī)上使用刷臉支付
            ⑥把游玩感受發(fā)到“朋友圈”

            組卷:1引用:1難度:0.6
          • 3.用Access軟件設(shè)計(jì)某校圖書借閱信息管理系統(tǒng)的數(shù)據(jù)庫,其中“圖書表”中需要存儲如表所示的數(shù)據(jù)。
            序號 書名 類別
            代碼
            出版社 作者 價格 登記日期
            1 活著 001 北京十月文藝出版社 余華 ¥23.30 2008年9月1日
            2 文化苦旅 001 長江文藝出版社 余秋雨 ¥39.80 2015年3月1日
            3 百年孤獨(dú) 002 南海出版公司 加西亞?馬爾克斯 ¥31.60 2012年8月2日
            下列關(guān)于“圖書表”的描述,正確的是(  )

            組卷:0引用:1難度:0.6
          • 4.使用GoldWave軟件編輯某音頻文件,選中其中一段音頻后,部分界面如圖所示。

            下列說法正確的是(  )

            組卷:0引用:1難度:0.6
          • 5.下列關(guān)于數(shù)制的說法,正確的是(  )

            組卷:3引用:1難度:0.5

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

          • 15.小李設(shè)計(jì)的一VB程序功能如下:在文本框Text1中輸入隨機(jī)數(shù)的個數(shù)n(個數(shù)不超過100),單擊“生成”按鈕Command1,生成n個隨機(jī)整數(shù),奇數(shù)位置產(chǎn)生奇數(shù),偶數(shù)位置產(chǎn)生偶數(shù),并將它們依次存儲在數(shù)組a中。單擊“排序”按鈕Command2,對數(shù)組各元素中的奇數(shù)實(shí)現(xiàn)升序排序,偶數(shù)實(shí)現(xiàn)降序排序。部分運(yùn)行界面如圖所示。

            (1)下列對象不具有 Caption 屬性的是
             
            (單選,填字母:A.Form1/B.Text1/C.Label1)
            (2)實(shí)現(xiàn)上述功能的 VB 程序如下,請?jiān)跈M線處填入合適代碼。
            (3)程序代碼中的加框處代碼有誤,請改正。
            Dim n As Integer
            Dim a(1 To 100)As Integer
            Private Sub create_Click (  )
            Dim i As Integer
            Randomize
            n=Val(Text1.Text)
            For i=1 To n
            a(i)=Int(Rnd (  )*45)*2+11
            If ①
             
             Then a(i)=a(i)-1
            List1.AddItem Str(a(i))
            Next i
            End Sub
            Private Sub sort_Click (  )
            For i=1 To n\2
            For j=1 To n-2*i Step 2
            If ②
             
             Then
            t=a(j):a(j)=a(j+2):a(j+2)=t
            End If
            Next j

            k=c
            For j=k+2 To n Step 2
            If a(j)>a(k)Then  ③
             

            Next j
            If k<>c Then
            t=a(k):a(k)=a(c):a(c)=t
            End If
            Next i
            For i=1 To n
            List2.AddItem Str(a(i))
            Next i
            End Sub

            組卷:0引用:1難度:0.5
          • 16.小李上網(wǎng)時發(fā)現(xiàn)詞云圖很有意思,出現(xiàn)頻率越高的文字越會突出顯示。他以此獲得靈感,編寫了一個“詞云榜”的VB程序,功能如下:單擊“讀取”按鈕command1,從數(shù)據(jù)庫中讀取英文名言的相關(guān)數(shù)據(jù),將各條名言存儲在數(shù)組st中,并將各元素顯示在列表框List1;在文本框Text1中輸入需要輸出的行數(shù),單擊“統(tǒng)計(jì)”按鈕command2,先在數(shù)組st各元素中提取單詞(單詞間隔符號只可能是空格、逗號和句號)存儲到數(shù)組word中,再將word數(shù)組各元素值進(jìn)行整理和歸類,把不同的單詞分別存儲到數(shù)組term中,同時統(tǒng)計(jì)各單詞的出現(xiàn)次數(shù),接著按照各單詞出現(xiàn)次數(shù)從高到低排序,最后在列表框List1中的第一行顯示出現(xiàn)次數(shù)最多的一個單詞,第二行顯示出現(xiàn)次數(shù)第二、第三多的兩個單詞,第三行顯示出現(xiàn)次數(shù)第四、第五、第六多的三個單詞……以此類推。程序運(yùn)行界面如圖所示。

            (1)分析程序,可知數(shù)據(jù)庫的文件名為
             

            (2)請?jiān)跈M線處填入合適的代碼。
            Dim conn As New ADODB.Connection
            Dim rs As New ADODB.Recordset
            Dim st(1 To 100)As String
            Dim n As Integer
            Private Sub Command1_Click
             

            conn.ConnectionString=“provider=microsoft.ace.jye.ai.12.0;data source=“& App.Path &“\名言.a(chǎn)ccdb“
            conn.Open
            Set rs.ActiveConnection=conn
            rs.Open“Select*From sayings“
            n=0
            Do While Not rs.EOF
            n=n+1
            st(n)=rs.Fields(“sentence“)
            rs.MoveNext
            Loop
            rs.Close
            conn.Close
            Set conn=Nothing
            For i=1 To n
            List1.AddItem st(i)
            Next i
            End Sub
            Private Sub Command2_Click
             

            Dim word(1 To 1000)As String
            Dim term(1 To 1000)As String
            Dim num(1 To 1000)As Integer
            k=1
            For i=1 To n
            For j=1 To Len(st(i))
             

            If c>=“A“And c<=“Z“Then c=Chr(Asc(c)+32)
            If c<>““And c<>“,“And c<>“.“Then
            temp=temp+c
            Else
            word(k)=temp
            k=k+1
            temp=““
            End If
            Next j
            Next i
            t=1
            term(1)=word(1):num(1)=1
            For i=2 To k-1
            For j=1 To t
            If 
             
             Then Exit For
            Next j
            If j>t Then
            t=t+1
            term(t)=word(i)
            num(t)=1
            Else
            num(j)=num(j)+1
            End If
            Next i
            ’數(shù)組term按照單詞出現(xiàn)次數(shù)從高到低進(jìn)行排序,代碼略
            List2.AddItem““+term(1)
            x=2:w=1:v=1:txt=““
            Do While x<=Val(Text1.Text)
            w=w+1
            For y=1 To w
             

            txt=txt+““+term(z)
            Next y
            List2.AddItem txt
            txt=““
            x=x+1
            v=z
            Loop
            End Sub

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