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

2017年浙江省普通高校招生信息技術(shù)仿真試卷(選考)(2)(11月份)

發(fā)布:2024/10/29 11:30:5

一、選擇題(本題共有12小題,每小題2分,共24分.在每小題給出的四個(gè)選項(xiàng)中,只有一個(gè)符合題目要求,不選、多選、錯(cuò)選均不得分)

  • 1.三國(guó)赤壁之戰(zhàn)時(shí)黃蓋獻(xiàn)上詐降書,騙得曹操信任后防火燒船,這實(shí)例主要體現(xiàn)了信息的什么特征( ?。?/h2>

    組卷:14引用:3難度:0.9
  • 2.亞馬遜最近推出了“Amazon Go”免排隊(duì)超市.在該超市中顧客拿了商品就可以走,無需排隊(duì),付錢系統(tǒng)會(huì)自動(dòng)結(jié)算.則下列哪個(gè)應(yīng)用不是人工智能技術(shù)( ?。?/h2>

    組卷:9引用:5難度:0.9
  • 3.在Word的編輯窗口出現(xiàn)如下圖所示的樣式,則說明Word開啟了(  )
    菁優(yōu)網(wǎng)

    組卷:6引用:2難度:0.9
  • 4.某算法的部分流程圖如圖所示,執(zhí)行這部分流程后,變量a和b的值分別為(  )
    菁優(yōu)網(wǎng)

    組卷:7引用:4難度:0.7
  • 5.有一Access數(shù)據(jù)表,其設(shè)計(jì)視圖如圖a所示,數(shù)據(jù)表如圖b所示,下列說法正確的是(  )
     菁優(yōu)網(wǎng)

    組卷:8引用:1難度:0.7

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

  • 16.數(shù)據(jù)插入.用VB設(shè)計(jì)程序,主要功能如下:隨機(jī)產(chǎn)生15個(gè)200以內(nèi)的正整數(shù)數(shù)列,按升序排序后顯示在List1列表框中,在文本框Text1中輸入1個(gè)200以內(nèi)的正整數(shù),單擊“插入”按鈕Command1后將其插入到數(shù)列中,并保持?jǐn)?shù)列仍然有序,顯示在列表List2中,同時(shí)在標(biāo)簽Label4中顯示插入的位置,程序界面如圖所示.
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)上述功能的VB程序代碼如下,請(qǐng)?jiān)跈M線處填上合適的代碼.
    Dim a( 1To 20)As Integer
    Private Sub Command1_Click ( ?。?br />Dim key As Integer
    key=
    i=1
    Do While key>a ( i ) And ( i<=1 5 )
    i=i+1
    Loop
    Label4.Caption=“該數(shù)插入的位置是:”+Str ( i )
    If  i=16  Then
    a ( i )=key
    Else
    For j=16  To  i+1Step-1

    Next j
    a ( i )=key
    End  If
    List2.Clear
    For i=1To 16
    List2.AddItem a( i)
    Next i
    End Sub
    Private Sub Form_Load ( ?。?br />'隨機(jī)生成15個(gè)200以內(nèi)的正整數(shù)
    Randomize
    For i=1To 15
    a ( i )=Int(Rnd*200)+1
    Next i
    '將15個(gè)數(shù)從小到大排序
    For i=1To 14
    k=i
    For j=i+1To 15
    If a ( k )>a ( j ) Then k=j
    Next j
    If  i<>k  Then
    t=a(i);a( i)=a ( k ):a ( k )
    End  If
    Next i
    '將排好序的數(shù)輸出在列表框Listl中
    Listl.Clear
    For i=1To 15
    Listl.AddItem str ( a ( i ) )
    Next i
    End Sub
    程序中①橫線處應(yīng)填入
     
    ,程序中②橫線處應(yīng)填入
     

    組卷:5引用:1難度:0.1
  • 17.如果一個(gè)自然數(shù)恰好等于它的各因數(shù)之和,則稱該數(shù)為完全數(shù).這里的因素都是除去本身的正因數(shù).例如:第一個(gè)完全數(shù)是6,它有因數(shù)1、2、3、6,除去它本身6外,其余3個(gè)數(shù)相加,1+2+3=6.尋找完全數(shù)并不是容易的事.經(jīng)過不少數(shù)學(xué)家研究,到2013年2月6日為止,一共找到了48個(gè)完全數(shù).
    小明設(shè)計(jì)了一個(gè)VB程序,用于求解10000以內(nèi)的所有完全數(shù).點(diǎn)擊按鈕Command1,標(biāo)簽Label1顯示完全數(shù)的個(gè)數(shù),并在列表框中顯示10000以內(nèi)所有的完全數(shù).
    程序運(yùn)行效果如圖所示
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)跈M線處填入合適代碼.
    Private Sub Command1_Click (  )
    Dim i As Integer,j  As Integer,c  As  Integer,s As Integer
    c=0‘用于存儲(chǔ)完全數(shù)的個(gè)數(shù)
    For i=1To 10000
    s=0‘用于存儲(chǔ)各因數(shù)之和
    For j=1To i-1
    If fac(i,j)  Then
     

    Next j
    If  i=s Then
     

    Listl.AddIltem Str( i)
    End  If
    Next i
    Label.Caption=“10000 以內(nèi)共有”+Str(c)+“個(gè)完全數(shù)!”
    End Sub

    Function fac(x As Integer,y As Integer) As Boolean
    '如果y是x的因數(shù)返回True,否則返回False
    If
     
    Then
    fac=True
    Else
    fac=False
    End  If
    End  Function.

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