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

2016年浙江省溫州市普通高中選考科目信息技術(shù)試卷(3月份)

發(fā)布:2024/4/20 14:35:0

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

  • 1.在春節(jié)期間,小李通過手機微信群給同學(xué)們發(fā)紅包,群中所有人看到后都能爭搶紅包,微信群中這一現(xiàn)象主要體現(xiàn)了信息的( ?。?/h2>

    組卷:7引用:6難度:0.9
  • 2.如圖所示為某動畫序列的4幅相鄰圖象,這些圖象之間存在一定的相關(guān)性,下列說法正確的是( ?。?br />菁優(yōu)網(wǎng)

    組卷:9引用:7難度:0.9
  • 3.王林平時關(guān)注手機電池的正確使用,有關(guān)鋰電池的文章截圖如圖所示:
    菁優(yōu)網(wǎng)
    下列說法正確的是( ?。?/h2>

    組卷:10引用:7難度:0.9
  • 菁優(yōu)網(wǎng)4.某學(xué)生的Win10自帶郵件客戶端軟件如圖所示,某次使用過程中能正常接收郵件但無法發(fā)送郵件,下列說法正確的是(  )

    組卷:5引用:6難度:0.9
  • 5.小明通過ATM機進行存款等操作,下列說法正確的是( ?。?/h2>

    組卷:11引用:6難度:0.9

【加試題】

  • 菁優(yōu)網(wǎng)16.如果兩個質(zhì)數(shù)的差為2,則這兩個質(zhì)數(shù)稱為孿生質(zhì)數(shù)對;編寫VB程序,實現(xiàn)如下功能:單擊“顯示孿生質(zhì)數(shù)對”按鈕Command1,在列表框list1中顯示100以內(nèi)的所有孿生質(zhì)數(shù)對(運行效果如圖所示)。
    實現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯,請改正。
    Dim a(1To 50)As Integer
    Private Sub Command1_Click (  )
    Dim i As Integer
    k=0:i=3
    Do While i<=100
    If 菁優(yōu)網(wǎng)Then‘(1)
    k=k+1
    a(k)=i
    End If
    i=i+2
    Loop
    For i=2To k
    If 菁優(yōu)網(wǎng)Then‘(2)
    List1.AddItem Str(a(i-1))+“和“+Str(a(i))
    End If
    Next i
    End Sub
    Function prime(x As Integer) As Boolean
    prime=False
    For i=2To Int(Sqr(x))
    If x Mod i=0Then
    prime=True
    Exit For
    End If
    Next i
    End Function。

    組卷:15引用:4難度:0.1

【加試題】

  • 17.編寫VB程序,實現(xiàn)如下功能:單擊“排序數(shù)組a”按鈕Command1時,對已有數(shù)組a的數(shù)據(jù)進行升序排列,并顯示在文本框Label1中;單擊“顯示數(shù)組b”按鈕Command2時,將升序數(shù)組b的數(shù)據(jù)顯示在文本框Label2中;再單擊“合并a和b”按鈕Command3時,對數(shù)組a和數(shù)組b升序合并到字符串中,將合并后的數(shù)據(jù)在文本框Label3中顯示.(運行效果如第17題圖所示).實現(xiàn)上述功能的VB代碼如下,請在橫線處填入合適代碼.
    菁優(yōu)網(wǎng)
    Dim a(1To 6)As Integer
    Dim b(1To 6)As Integer
    Private Sub Command1_Click( ?。?對數(shù)組a中的數(shù)據(jù)進行排序
    Dim i As Integer,j As Integer,k as integer
    a(1)=53:a(2)=18:a(3)=62:a(4)=22:a(5)=6:a(6)=25
    s=““
    For i=1To 5
    k=i
    For j=i+1To 6
    If a(k)>a(j) Then ①
     

    Next j
    If i<>k Then
    t=a(k):a(k)=a(i):a(i)=t
    End If
    Next i
    For i=1To 6
    s=s+Str(a(i))
    Next i
    Label1.Caption=s
    End Sub
    Private Sub Command2_Click (  )
    b(1)=3:b(2)=8:b(3)=15:b(4)=27:b(5)=38:b(6)=49
    '此處部分代碼省略
    End Sub
    Private Sub Command3_Click ( ?。?br />'將數(shù)組a和b中的數(shù)據(jù)逐個比較后添加到新的字符串s中,并將s在label3中顯示
    i=1:j=1:s=““
    Do While i<=6 ②
     
    j<=6'如果兩數(shù)組都還有數(shù)據(jù)未合并
    If ③
     
    Then
    s=s+Str(a(i)):i=i+1
    Else
    s=s+Str(b(j)):j=j+1
    End If
    Loop
    Do While i<=6'只有數(shù)組a還有數(shù)據(jù)未合并
    s=s+Str(a(i)):i=i+1
    Loop
    Do While j<=6'只有數(shù)組b還有數(shù)據(jù)未合并
    s=s+Str(b(j)):j=j+1
    Loop
    Label3.Caption=s
    End Sub.

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