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

          2018-2019學年浙江省寧波市北侖中學高一(上)期中信息技術試卷

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

          一、選擇題(本大題共16小題,每小題2分,共32分.在每小題給出的四個選項中,只有一個是符合題目要求的)

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

            組卷:17引用:4難度:0.4
          • 2.下列有關信息的說法,正確的是(  )

            組卷:9引用:1難度:0.5
          • 3.下列關于信息技術及通信技術說法不正確的是(  )

            組卷:23引用:2難度:0.9
          • 4.下列應用中,體現了人工智能技術的有(  )
            ①停車管理系統通過拍攝識別車牌號碼,并用語音進行播報
            ②智能翻譯機實現實時語音翻譯
            ③某同學和遠方的朋友視頻通話
            ④智慧教室能根據光線情況調整照明亮度
            ⑤阿法狗和李世石的終極之戰

            組卷:8引用:4難度:0.6
          • 5.下列關于瀏覽器及網頁的說法,下列說法正確的是(  )

            組卷:8引用:2難度:0.6
          • 6.下列描述正確的是(  )

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

          二、非選擇題(本大題共4小題,其中第17、18小題各4分,第19、20小題各5分,共18分)

          • 19.模擬一個簡單計算器,輸入兩個數和一個運算符(加、減、乘、除),進行算術運算,并輸出運算結果。程序界面如圖所示,在文本框Text1輸入第一個數a,在文本框Text2輸入第二個數b,在文本框Text3輸入運算符ch,在文本框Text4中輸出結果。當輸入的運算符不是加、減、乘、除四種運算符時,則輸出“運算符不正確”;當進行除法運算時,如果除數為0,提示輸出“除數不能為零”。相應的Visual Basic程序如下,
            (1)觀察程序設計界面,共有類對象具有Caption屬性。
            (2)實現上述功能的VB程序如下在①、②、③橫線處,填入合適的語句或表達式,把程序補充完整。
            Private Sub Command1_Click (  )
            Dim a As Single,b As Single,ch As String
            a=Val(Text1.Text)
            b=Val(Text2.Text)
             

            If ch=“+“Then
            Text4.Text=Str(a+b)
            ElseIf ch=“*“Then
            Text4.Text=Str(a*b)
            ElseIf ch=“-“Then
            Text4.Text=Str(a-b)
            ElseIf ch=“/“Then
            If
             
            Then Text4.Text=Str(a/b) Else Text4.Text=“除數不能是零“
            Else
             

            End If
            End Sub

            組卷:2引用:2難度:0.5
          • 20.編“字符串生成”程序,實現如下功能:在文本框Text1中(字符位置)輸入多個正整數 (以“,”為分割符和結束符),單擊“生成”按鈕Command1,程序以這些整數為位置信息,依次從文本框Text2中(字典內容)提取字符并連接成字符串,最后將字符串顯示在標簽Label1中(生成內容)。程序運行界面如圖所示。

            (1)要使程序運行時,窗體Form1標題顯示“字符串生成”,可在Form_Load事件過程中添加語句
             
            (單選,填字母:A.Form1=“字符串生成“/B.Forml.Text=“字符串生成“/C.Form1.Caption=“字符串生成“)。
            (2)實現上述功能的VB程序如下,請在橫線處填入合適的代碼。
            Private Sub Command1_Click (  )
            Dim s As String,t As String,c As String
            Dim i As Integer,p As Integer
            s=““:t=““
            For i=1To Len(Text1.Text)
            c=Mid(Text1.Text,i,1)
            If c=“,“Then
            p=Val(t)
            s=s+Mid(Text2.Text,p,1)
            t=““
            Else
            t=      
            End If
            Next i
            Label1.Caption=     
            End Sub
            (3)若文本框Text1中輸入內容的結束符缺失(即輸入內容為1,18,9,9),單擊“生成”按鈕后,標簽Label1中顯示的內容是
             

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