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

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

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

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

  • 1.小葉利用手機(jī)12306軟件網(wǎng)上購(gòu)買(mǎi)火車(chē)票,部分界面如圖所示,從圖中可以獲取到的正確信息是(  ) 
    菁優(yōu)網(wǎng)

    組卷:10引用:1難度:0.9
  • 菁優(yōu)網(wǎng)2.小敏查看了某購(gòu)物網(wǎng)站賣(mài)家的信用評(píng)價(jià)等信息,其部分頁(yè)面如圖所示,圖中好評(píng)率“99.19%”代表的含義是( ?。?/h2>

    組卷:8引用:4難度:0.9
  • 3.如圖所示,由圖a得到圖b,采用的操作是( ?。?br />菁優(yōu)網(wǎng)

    組卷:6引用:1難度:0.9
  • 4.字符“A”比“a”的ASCII碼值小32(十進(jìn)制),已知字符“K”的二進(jìn)制為1001011,則字符“k”的二進(jìn)制ASCII碼值是( ?。?/h2>

    組卷:16引用:6難度:0.7
  • 5.如圖所示是一個(gè)使用Access軟件創(chuàng)建的數(shù)據(jù)表,該表記錄了部分教材的情況.
    菁優(yōu)網(wǎng)
    下列說(shuō)法正確的是( ?。?/h2>

    組卷:9引用:2難度:0.5

四、解答題(共2小題,滿分13分)

  • 菁優(yōu)網(wǎng)16.有序序列合并.
    將兩個(gè)不下降有序序列合并為一個(gè)不下降有序序列.下面程序模擬該功能,程序界面如圖所示,單擊“生成序列一”按鈕Command1生成10個(gè)有序數(shù)字,并在List1中顯示,單擊“生成序列二”按鈕Command2生成10個(gè)有序數(shù)字,并在List2中顯示,單擊“序列合并”按鈕Command3,將兩組數(shù)據(jù)進(jìn)行合并,并在List3中顯示.
    序列一中的數(shù)據(jù)存儲(chǔ)在a數(shù)組中,序列二中的數(shù)據(jù)存儲(chǔ)在b數(shù)組中,合并后的數(shù)據(jù)存儲(chǔ)在c數(shù)組中.
    實(shí)現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯(cuò),請(qǐng)改正.
    Dim a(1To 10)As Integer
    Dim b(1To 10)As Integer
    Dim c(1To 20)As Integer
    Private Sub Command1_Click
     

    '生成10個(gè)不下降有序數(shù)字,存儲(chǔ)在a(1)到a(10)中,并在List1中顯示
    '代碼略
    End Sub
    Private Sub Command2_Click
     

    '生成10個(gè)不下降有序數(shù)字,存儲(chǔ)在b(1)到b(10)中,并在List2中顯示
    '代碼略
    End Sub
    Private Sub Command3_Click
     
    '將數(shù)a組和b數(shù)組合并,存儲(chǔ)在c數(shù)組中
    Dim i As Integer,j As Integer,k As Integer
    i=1'變量i表示a數(shù)組中第1個(gè)未處理的數(shù)
    j=1'變量j表示b數(shù)組中第1個(gè)未處理的數(shù)
    t=0'變量t表示c數(shù)組中已加入的數(shù)的個(gè)數(shù)
    Do While菁優(yōu)網(wǎng)'第(1)處錯(cuò)誤
    t=t+1
    If a(i)<b(j)Then
    c(t)=a(i)
    i=i+1
    Else
    c(t)=b(j)
    j=j+1
    End If
    Loop

    If i<=10Then
    For k=i To 10
    t=t+1
    菁優(yōu)網(wǎng)'第(2)處錯(cuò)誤
    Next k
    End If
    If j<=10Then
    For k=j To 10
    t=t+1
    c(t)=b(k)
    Next k
    End If
    List3.Clear
    For i=1To 20
    List3.AddItem(Str(c(i)))
    Next i
    End Sub.

    組卷:11引用:1難度:0.1
  • 菁優(yōu)網(wǎng)17.小明想用VB編程制作一個(gè)名次計(jì)算器,首先將同學(xué)的成績(jī)錄入到計(jì)算機(jī)中,同時(shí)存放在數(shù)組a中,顯示在左邊列表框中.點(diǎn)擊“排序”按鈕后,程序會(huì)將成績(jī)從高到低依次排序顯示在右邊的列表框中.運(yùn)行界面如圖所示,請(qǐng)?jiān)趦蓚€(gè)橫線處填入代碼.
    Dim a(1To 100)As Single
    Dim shu As Integer
    Private Sub Command1_Click
    Dim i,j,k As Integer
    Dim t As Single
    For i=1To shu-1
    k=i
    For j=i+1 To shu
    If ①
     
    Then
    t=a(j):a(j)=a(k):a(k)=t
    End If
    Next j
    Next i
    For i=1 To shu
    List2.AddItem“第“& Str(i) &“名:“& Str(a(i))
    Next i
    End Sub
    Private Sub Text1_KeyPress(KeyAscii As Integer)
    Dim cj As Single
    If KeyAscii=13Then
    cj=Val(Text1.Text)
    If cj>0Then
     

    List1.AddItem Str(shu) &“:“& Str(cj)
    a(shu)=cj
    End If
    Text1.Text=““
    End If
    End Sub.

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