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

2020年浙江省杭州高級中學(xué)高考信息技術(shù)仿真模擬試卷

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

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

  • 1.下列有關(guān)信息的說法,正確的是( ?。?/h2>

    組卷:7引用:1難度:0.5
  • 2.下列有關(guān)瀏覽器與收藏夾的說法,正確的是( ?。?/h2>

    組卷:0引用:1難度:0.6
  • 3.小悅使用Word軟件處理信息的部分界面如圖所示,下列說法正確的是( ?。?img alt="菁優(yōu)網(wǎng)" src="http://img.jyeoo.net/quiz/images/202007/140/9a5b3cad.png" style="vertical-align:middle" />

    組卷:1引用:1難度:0.5
  • 菁優(yōu)網(wǎng)4.某Access數(shù)據(jù)表編輯界面如圖所示,以下說法錯誤的是(  )

    組卷:13引用:9難度:0.7
  • 5.使用Photoshop軟件對“元宵節(jié)1.psd”進(jìn)行處理,編輯界面如圖所示。下列說法正確的是( ?。?br />菁優(yōu)網(wǎng)

    組卷:3引用:1難度:0.5

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

  • 菁優(yōu)網(wǎng)15.某校運動會跳遠(yuǎn)比賽,共m位(m≤20)選手參加該比賽,第一輪初賽每位選手跳3次,然后按每位選手的最好成績,按高到低取前k名(若最好成績相同,則名次相同)進(jìn)入第二輪復(fù)賽。
    每位選手的成績數(shù)據(jù)記錄規(guī)則如下:成績數(shù)據(jù)以“;”(分號)結(jié)尾,中間用“/”(斜杠)分隔,例如:“王一超/4.10/-/3.78;李雨歆/3.87/3.85/4.20;”,表示第一位選手王一超,第一次成績4.10米,第二次成績無效(用“-”表示),第三次成績3.78米,最好成績?yōu)?.10米。第二位選手李雨歆,3次成績分別是3.87米、3.85和4.20米,最好成績?yōu)?.20米。
    小強(qiáng)編寫VB程序?qū)崿F(xiàn)上述功能:程序運行時,讀取所有選手?jǐn)?shù)據(jù)保存在變量cj中,并顯示在列表框 List1中。在文本框Text1中輸入進(jìn)入第二輪的名次,單擊“第二輪復(fù)賽名單”按鈕 Command1,對數(shù)據(jù)進(jìn)行統(tǒng)計分析,并在列表框 List2 中顯示進(jìn)入復(fù)賽的選手名單和最好成績,程序運行界面如圖所示,請回答下列問題。
    (1)代碼“List2.AddItem”中的 AddItem 是
     
    (單選,填字母:A.事件名/B.方法名/C.屬性名)。
    (2)實現(xiàn)上述功能的 VB 程序如下,請在橫線處填入合適的代碼。
    (3)程序中加框處代碼有錯,請改正。
    Private Sub Command1_Click ( ?。?br />Dim cj As String,xm(1 To 20)As String,maxcj(0 To 20)As Single
    Dim s As String,c As String,t As Single,z As Integer
    Dim i As Integer,j As Integer,n As Integer,k As Integer,m As Integer
    '讀取所有選手?jǐn)?shù)據(jù)保存在變量cj中,并顯示在列表框 List1中,代碼略
    n=Len(cj)
    i=1:m=1:z=1
    Do While i<=n
    c=Mid(cj,i,1)
    j=i
    Do While  菁優(yōu)網(wǎng)'(3)
    i=i+1
    c=Mid(cj,i,1)
    Loop
    If z=1 Then

    Else
    t=Val(Mid(cj,j,i-j))
    If t>maxcj(m) Then maxcj(m)=t
    End If
    z=z+1:i=i+1
    If c=″;″Then m=m+1:z=1
    Loop
    m=m-1
    k=Val(Text1.Text)
    For i=1 To m-1
    For j=
    If  maxcj(j)>maxcj(j-1)Then
    c=xm(j):xm(j)=xm(j-1):xm(j-1)=c
    t=maxcj(j):maxcj(j)=maxcj(j-1):maxcj(j-1)=t
    End If
    Next j
    If Then
    List2.AddItem xm(i)+Str(maxcj(i))
    Else
    Exit For
    End If
    Next i
    End Sub

    組卷:0引用:1難度:0.5
  • 16.某地區(qū)進(jìn)行了4三個年級技術(shù)聯(lián)考,現(xiàn)要求按學(xué)校分類對高三年級技術(shù)成績降序排序后輸出。小王編寫了一個VB程序?qū)崿F(xiàn)上述要求。先單擊“統(tǒng)計”按鈕Command1,讀取數(shù)據(jù)庫中每位學(xué)生的學(xué)校、年級、姓名和成績等信息,進(jìn)行統(tǒng)計分析后,并在列表框List2中分學(xué)校按成績降序輸出。程序運行時界面如圖所示。
    菁優(yōu)網(wǎng)
    (1)根據(jù)圖中示例數(shù)據(jù),采用選擇排序算法分別對學(xué)校B的數(shù)據(jù)進(jìn)行排序,整個排序過程中,數(shù)組元素之間的比較次數(shù)是
     
    (單選,填字母:A.37×19 次/B.37×18 次/C.36次)。
    (2)請在橫線處填入合適的代碼。
    Const rs=480'聯(lián)考參加學(xué)生總?cè)藬?shù)rs
    Const no=3'聯(lián)考參加學(xué)校數(shù)no
    Dim school(1 To rs) As String'存儲學(xué)生的學(xué)校
    Dim nj(1 To rs) As String'存儲學(xué)生的年級
    Dim xm(1 To rs) As String'存儲學(xué)生的姓名
    Dim cj(1 To rs) As Integer'存儲學(xué)生的成績
    Dim p(1 To rs) As Integer'索引數(shù)組
    Dim num(1 To no) As Integer
    Dim n As Integer
    Function id(s As String) As Integer
    '根據(jù)學(xué)校名稱轉(zhuǎn)換為對應(yīng)的數(shù)字ID號,代碼略
    End Function
    Private Sub form_load ( ?。?br />'本過程讀取每位學(xué)生的學(xué)校、年級、姓名和成績的數(shù)據(jù)分別存儲在數(shù)組school,nj、xm 和 cj 中,并在 List1 中顯示學(xué)生成績數(shù)據(jù)和每個學(xué)校的高三人數(shù),代碼略;
    End Sub
    Private Sub Command1_Click ( ?。?br />Dim i As Integer,j As Integer,k As Integer,t As Integer,pos As Integer
    Dim b(1 To no) As Integer,c(1 To rs) As Integer,q(1 To rs) As Integer
    k=0
    For i=1 To n
    If nj(i)=″高三″Then
    k=k+1
    p(k)=①
     

    num(id(school(i)))=num(id(school(i)))+1
    End If
    Next i
    '在 List1 中顯示各學(xué)校的高三人數(shù),代碼略;
    c(1)=1
    For i=2 To no
    c(i)=c(i-1)+num(i-1)
    Next i
    For i=1 To k
    t=id(school(p(i)))

    c(t)=c(t)+1
    Next i
    '----按學(xué)校分類,從高分到低分排序后輸出-----
    pos=1
    For i=1 To no
    For j=pos To c(i)-2
    For m=c(i)-1 To j+1 Step-1
    If  Then
    temp=q(m):q(m)=q(m-1):
    End If
    Next m
    Next j
    pos=c(i)
    Next i
    For i=1 To k
    List2.AddItem school(q(i)) &″″& xm(q(i)) &″″& nj(q(i)) &″″& cj(q(i))
    Next i
    End Sub

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