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

2017年浙江省普通高校高考信息技術(shù)模擬試卷(7)

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

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

  • 1.如圖所示,某用戶正通過蘋果公司的Apple Pay移動支付服務(wù)進(jìn)行手機(jī)支付,將手機(jī)距離刷卡機(jī)2~3厘米內(nèi),不需任何操作即可通過關(guān)聯(lián)的個人信用卡完成支付.下列說法中正確的是( ?。?/h2>

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

    組卷:9引用:7難度:0.9
  • 3.某銀行的客戶信息管理系統(tǒng)中有一張用Access軟件創(chuàng)建的數(shù)據(jù)表,其結(jié)構(gòu)如圖所示:

    下列說法正確的是(  )

    組卷:9引用:2難度:0.9
  • 4.小明利用Access軟件創(chuàng)建了某數(shù)據(jù)表,此表結(jié)構(gòu)如圖1所示,并在該數(shù)據(jù)表中錄入了部分?jǐn)?shù)據(jù),如圖2所示,下列說法不正確的是( ?。?br />

    組卷:8引用:2難度:0.7
  • 5.使用Access軟件創(chuàng)建一張數(shù)據(jù)表,其結(jié)構(gòu)如圖所示:

    在該數(shù)據(jù)表中輸入數(shù)據(jù)時,下列操作能實現(xiàn)的是( ?。?/h2>

    組卷:9引用:3難度:0.7

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

  • 16.【加試題】統(tǒng)計字母出現(xiàn)的頻數(shù).隨機(jī)輸入一段全部由小寫字母組成的字符串(默認(rèn)輸入的內(nèi)容都符合要求),長度不大于1000,分別統(tǒng)計a~z出現(xiàn)的次數(shù),未出現(xiàn)的字母次數(shù)默認(rèn)為0,對出現(xiàn)次數(shù)不為0的字母按出現(xiàn)次數(shù)降序排列.下面程序模擬該功能,程序界面如圖所示.在文本框Text1中輸入字符串,單擊“統(tǒng)計”按鈕Command1,在列表框List1顯示最終結(jié)果.

    實現(xiàn)上述功能的VB程序代碼如下,請在橫線處填上合適的代碼.
    Private Sub Command1_Click( ?。?br />Dim s As String
    Dim ch as String'定義存儲字符串中的字符ch
    Dim total(1To 26)As Integer'定義存儲a~z字母的出現(xiàn)頻數(shù)數(shù)組
    Dim word(1To 26)As Integer'定義存儲a~z字母的序號數(shù)組
    List1.Clear
    s=Text1.Text
    n=Len(s)
    For i=1To n
    ch=
    total(Asc(ch)-96)=total(Asc(ch)-96)+1
    Next i
    For i=1To 26
    word(i)=i
    Next i
    For i=1To 25
    k=i
    For  j=i+1To 26
    If total(k)<total(j) Then k=j
    Next j
    If i<>k Then
    t=total(i):total(i)=total(k):total(k)=t
    t=word(i):word(i)=word(k):word(k)=t
    End if
    Next i
    For i=1To 26
    IfThen
    List1.AddItem Chr(word(i)+96)&“”&total(i)
    End If
    Next i
    End Sub
    程序中①橫線處應(yīng)填入
     

    程序中②橫線處應(yīng)填入
     

    組卷:11引用:1難度:0.1
  • 17.【加試題】十進(jìn)制數(shù)轉(zhuǎn)化為某進(jìn)制數(shù)的轉(zhuǎn)換方法如圖所示.
    十進(jìn)制數(shù)x進(jìn)制數(shù)(x=2,8,16等)
    例中n=222(十進(jìn)制數(shù)),轉(zhuǎn)換成x進(jìn)制數(shù)的過程如下圖所示:
    (1)十進(jìn)制數(shù)→二進(jìn)制數(shù)

    (2)十進(jìn)制數(shù)→八進(jìn)制數(shù)

    (3)十進(jìn)制數(shù)→十六進(jìn)制數(shù)

    將每次所得的余數(shù)由下至上排列(逆序取余數(shù)),即有:
    (222)10轉(zhuǎn)換成二進(jìn)制數(shù)得到:1011110
    (222)10轉(zhuǎn)換成八進(jìn)制數(shù)得到:336
    (222)10轉(zhuǎn)換成十六進(jìn)制數(shù)得到:13 14
    這時得到的逆序余數(shù)串[在數(shù)組B(1)、B(2)、…、B(k)中]的每位數(shù)均為十進(jìn)制數(shù).程序中利用字符串A來計算X進(jìn)制數(shù)的位數(shù)(即COPY(A,B[i]+1,1)),見下表:
    數(shù)組B 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
    字串A 0 1 2 3 4 5 6 7 8 9 A B C D E F
    下標(biāo)i 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
    由上表得:(222)10=(1011110)2=(336)8=(DE)16
    程序運行效果如圖所示:

    實現(xiàn)上述功能的VB程序如下,請在橫線處填入合適的代碼.
    Public Function chg10(n As Integer,m As Integer)As String
    '將整數(shù)n轉(zhuǎn)換成m進(jìn)制數(shù)
    Dim k as Integer,yushu As Integer
    Dim temp As String
    Dim x As String
    x=“0123456789ABCDEF”
    k=n
    Do While
    yushu=k Mod m

    k=k\m
    Loop
    chg10=temp
    End Function
    Private Sub Command1_Click(  )
    Dim a As Integer
    a=Val(Text1.Text)
    Label5.Caption=chg10(a,2)
    Label6.Caption=chg10(a,8)
    Label7.Caption=chg10(a,16)
    End Sub.

    組卷:9引用:1難度:0.1
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)改正