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

2016年4月浙江省普通高校招生選考信息技術(shù)試卷

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

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

  • 1.下列有關(guān)信息的說(shuō)法,正確的是(  )

    組卷:31引用:6難度:0.9
  • 2.實(shí)現(xiàn)將電子郵件從發(fā)件人電子信箱發(fā)送到收件人電子信箱的協(xié)議是( ?。?/h2>

    組卷:21引用:6難度:0.9
  • 3.小華掃描報(bào)紙得到“paper.jpg”文件,使用OCR軟件進(jìn)行字符識(shí)別,部分界面如圖所示。下列說(shuō)法不正確的是( ?。?br />菁優(yōu)網(wǎng)

    組卷:21引用:13難度:0.9
  • 4.關(guān)于Access數(shù)據(jù)表的操作,說(shuō)法正確的是(  )

    組卷:20引用:3難度:0.9
  • 5.某算法的部分流程圖如圖所示,執(zhí)行這部分流程后,變量x的值是( ?。?br />菁優(yōu)網(wǎng)

    組卷:17引用:8難度:0.9

【加試題A】

  • 16.【加試題】某地1900-1999年的平均降水量數(shù)據(jù)保存在數(shù)據(jù)庫(kù)中.現(xiàn)要求找出相鄰兩年年平均降水量變化(即本年度與上年度“年平均降水量”差值的絕對(duì)值)最大的年份區(qū)間.如果多個(gè)符合要求的年份區(qū)間,只輸入距今最近的.小吳為此編寫(xiě)了VB程序,程序運(yùn)行時(shí),單擊按鈕Command1后,在文本框Text1中輸出運(yùn)行結(jié)果.實(shí)現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯(cuò),請(qǐng)改正.
    Dim w(1To 100)As Single'依次存儲(chǔ)1900-1999年的年平均降水量數(shù)據(jù)
    Const n=100
    Private Sub Form_Load( ?。?br />'本過(guò)程從數(shù)據(jù)庫(kù)中按1900-1999年依次讀取年平均降水量數(shù)據(jù),并存儲(chǔ)在數(shù)組w中
    '代碼略
    End Sub
    Private Sub Command1_Click( ?。?br />Dim i As Integer,imax As Integer
    imax=菁優(yōu)網(wǎng)
    For i=3 To n
    If Abs(w(i)-w(i-1))>=菁優(yōu)網(wǎng)  Then imax=i
    Next i
    Text1.Text=“年平均降水量變化最大的年份區(qū)間是“+Str(imax+1898)+“-“+Str(imax+1899)
    End Sub.

    組卷:10引用:1難度:0.1

【加試題B】

  • 17.某數(shù)據(jù)壓縮方法描述如下:
    (1)原始數(shù)據(jù)中,某數(shù)不為0且相鄰無(wú)重復(fù),壓縮數(shù)據(jù)用該數(shù)據(jù)表示;
    (2)原始數(shù)據(jù)中,某數(shù)為0且相鄰無(wú)重復(fù),壓縮數(shù)據(jù)用兩個(gè)數(shù)表示,第1個(gè)位0,第2個(gè)為0;
    (3)原始數(shù)據(jù)中,某數(shù)據(jù)相鄰有重復(fù),壓縮數(shù)據(jù)用3個(gè)數(shù)表示:第1個(gè)位0,第2個(gè)為重復(fù)數(shù)的個(gè)數(shù),第3個(gè)為該數(shù)本身;
    根據(jù)上述壓縮方法,對(duì)應(yīng)的解壓縮方法示例如圖a所示.
    菁優(yōu)網(wǎng)
    小明編寫(xiě)了一個(gè)解壓送VB程序,功能如下:窗體加載時(shí),自動(dòng)讀取壓縮數(shù)據(jù),依次存儲(chǔ)在數(shù)組元素a(1)、a(2)、a(3)…中,壓縮數(shù)據(jù)的個(gè)數(shù)存儲(chǔ)在變量n中,壓縮數(shù)據(jù)顯示在文本框Text1中.單擊“解壓縮”按鈕Command1,程序?qū)嚎s數(shù)據(jù)依次進(jìn)行解壓縮處理,解壓縮數(shù)據(jù)顯示在文本框Text2中.程序運(yùn)行界面如圖b所示.
    (1)如果壓縮數(shù)據(jù)為“23,0,21,66,0,0,77,0,5,0”,則解壓縮數(shù)據(jù)的個(gè)數(shù)是
     

    (2)實(shí)現(xiàn)上述功能的VB程序如下.請(qǐng)?jiān)跈M線處填入合適代碼.
    Dim a(1To 100)As Integer'存儲(chǔ)壓縮數(shù)據(jù),最大處理個(gè)數(shù)為100
    Dim b(1To 1000)As Integer'存儲(chǔ)解壓縮數(shù)據(jù),最大處理個(gè)數(shù)為1000
    Dim n As Integer'存儲(chǔ)壓縮數(shù)據(jù)的個(gè)數(shù)
    Private Sub Form_Load ( ?。?br />'壓縮數(shù)據(jù)由上述壓縮方法生成
    '本過(guò)程用于讀取壓縮數(shù)據(jù)并存儲(chǔ)在數(shù)組a,壓縮數(shù)據(jù)個(gè)數(shù)存儲(chǔ)在變量n中
    '代碼略
    End Sub
    Private Sub Command1_Click (  )
    Dim pa As Integer'存儲(chǔ)壓縮數(shù)組當(dāng)前處理位置
    Dim pb As Integer'存儲(chǔ)解壓縮數(shù)組當(dāng)前處理位置
    Dim firstdata As Integer,count As Integer,i As Integer
    pa=1:pb=1
    Do While pa<=n
    firstdata=a(pa)
    If firstdata<>0Then'示例1情況處理
    b(pb)=firstdata
    pa=pa+1:pb=pb+1
    Else
    count=a(pa+1)
    If count=0Then'示例2情況處理
    b(pb)=0
    pa=:pb=pb+1
    Else'示例3情況處理
    For i=1To count

    Next i
    pa=pa+3:pb=pb+count
    End If
    End If
    Loop
    Text2.Text=Str(b(1))
    For i=2To
    Text2.Text=Text2.Text+“,“+Str(b(i))
    Next i
    End Sub.

    組卷:14引用:2難度:0.1
APP開(kāi)發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司| 應(yī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)改正