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

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

          發布:2024/11/16 0:0:2

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

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

            組卷:8引用:1難度:0.7
          • 2.下列選項中,體現了人工智能技術的有(  )
            ①醫生使用B超探測病人身體
            ②高速公路ETC通道自動識別車牌收費
            ③地圖軟件在有Wi-Fi連接的地方自動升級數據
            ④利用VR技術進行電腦游戲開發
            ⑤使用在線翻譯將中文轉換為英文

            組卷:8引用:2難度:0.5
          • 3.某學校的社團活動系統,使用了Access軟件創建了數據表,部分界面如圖所示:

            下列說法正確的是(  )

            組卷:0引用:1難度:0.6
          • 4.使用 UltraEdit 軟件觀察某字符串的內碼,已知該字符串包含標準 ASCII碼和漢字編碼,如圖所示。

            則下列說法中正確的是(  )

            組卷:2引用:1難度:0.5
          • 5.一個1024×768像素、24位真彩色、PAL制式(25幀/秒)的未經壓縮的AVI格式無聲視頻文件,將其壓縮為MP4 格式后(壓縮比為9:1)的文件大小約為125MB,則該視頻的時長約為(  )

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

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

          • 15.有一VB程序的功能如下:在文本框Text1中輸入若干個日期數據,年月日之間用“-”隔開,每一個日期以“;”結束(如2019-3-12;),單擊“提取”按鈕Command1,將每個日期數據顯示在列表框List1中,并將日期設置成“*年*月*日”的格式(如2019年3月12日)。程序界面如圖所示:
            (1)下列對象中有Text屬性的是
             
            (單選,填字母:A.Command1/B.Forml/C.Textl)。
            (2)實現上述功能的VB程序如下,請在橫線處填入合適的代碼。
            (3)程序中加框處代碼有錯,請改正。
            Private Sub Command1_Click (  )
            Const code=“年月日“
            s=Text1.Text
            i=1:x=0
            t=““:rq=““
            Do While i<=①
             

            c=Mid(s,i,1)
            If c>=“0“And c<=“9“Then
            t=t+c
            Else
            x=x+1
            rq=
            t=““
            If x=3 Then
            List1.AddItem rq
            rq=““
             

            End If
            End If
            i=i+1
            Loop
            End Sub

            組卷:1引用:1難度:0.3
          • 16.丑數是指質因數只包含2,3,5的自然數,例如6、8都是丑數,但7、14不是,因為它們包含質因子7,習慣上我們把1當做是第一個丑數。前10個丑數依次為:1,2,3,4,5,6,8,9,10,12,小李為此設計了一VB程序,功能如下:在文本框Text1中輸入一個自然數n(n<=500),單擊“求解”按鈕Command1,在文本框Text2中顯示對應的第n個丑數。程序界面如圖所示。

            (1)第11個丑數是
             

            (2)實現上述功能的VB程序如下,請在橫線處填入合適的代碼。
            Private Sub Command1_Click (  )
            Dim n As Integer,x As Long,y As Long
            Dim flag As Boolean
            n=1
            x=2
            Do While n<Val(Text1.Text)
            flag=True
             

            Do While y>1 And flag
            If y Mod 2=0 Then
            y=y\2
            ElseIf y Mod 3=0 Then
            y=y\3
            ElseIf y Mod 5=0 Then
            y=y\5
            Else
             

            End If
            Loop
            If flag Then n=n+1
            x=x+1
            Loop
            Text2.Text=Str(③
             

            End Sub

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