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

2021年浙江省高考信息技術(shù)仿真試卷(三)

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

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

  • 1.下列關(guān)于瀏覽器及信息獲取的說(shuō)法中正確的是( ?。?/h2>

    組卷:3引用:1難度:0.6
  • 2.下列有關(guān)word相關(guān)功能說(shuō)法不正確的是(  )

    組卷:2引用:1難度:0.5
  • 3.設(shè)計(jì)“小微圖書(shū)管理系統(tǒng)”時(shí),新建“圖書(shū)借閱”Access數(shù)據(jù)表,存放下列表格數(shù)據(jù):以下有關(guān)“小微圖書(shū)管理系統(tǒng)”和Access數(shù)據(jù)表結(jié)構(gòu)設(shè)計(jì)描述正確的是( ?。?
    圖書(shū)編號(hào) 圖書(shū)名稱 借閱人 借書(shū)日期 還書(shū)日期 是否損壞
    JS0001 Python編程從入門(mén)到實(shí)踐 黃曉琳 2019-5-14 2019-6-5
    JS0002 深入理解Java虛擬機(jī) 李語(yǔ)敏 2019-11-21 2019-12-25
    …… …… …… …… …… ……
    JX0712 歷史的原聲 王甜甜 2019-1-19 2020-6-1

    組卷:2引用:2難度:0.6
  • 4.下列關(guān)于多媒體硬件設(shè)備和多媒體軟件工具說(shuō)法不正確的是( ?。?/h2>

    組卷:10引用:1難度:0.5
  • 5.用photoshop軟件制作“在線教育”作品。當(dāng)前狀態(tài)下,下列說(shuō)法正確的是( ?。?br />菁優(yōu)網(wǎng)

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

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

  • 15.編寫(xiě)一個(gè)VB程序,實(shí)現(xiàn)如下功能:輸入s位數(shù)字構(gòu)成的數(shù)字字符串(第1位數(shù)字不為0),移除k (0<k<s)個(gè)數(shù)字后,在保證原數(shù)字相對(duì)位置不變的情況下,使剩余數(shù)字組成的新數(shù)為最?。ㄗⅲ盒聰?shù)第1位不能為0)。例如8個(gè)數(shù)字構(gòu)成的數(shù)字字符串“71803296”,移除3個(gè)數(shù)字,得到5位數(shù)字構(gòu)成的最小數(shù)是“10296”,具體算法如圖a所示。
    菁優(yōu)網(wǎng)
    算法分析:要使得到的5位數(shù)字最小,首先需保證能取到5個(gè)數(shù)字,且首位應(yīng)盡量小,那么取首位數(shù)的范圍應(yīng)保證余下有4個(gè)數(shù)字,即在前4位中選最小非0的數(shù)字。
    程序運(yùn)行時(shí),在文本框Text1中輸入一個(gè)數(shù)字字符串,在文本框Text2中輸入要移除的數(shù)字個(gè)數(shù),單擊“運(yùn)行”按鈕CmdRun后,在標(biāo)簽Labell顯示得到的最小新數(shù),程序運(yùn)行界面如圖b所示。
    (1)程序運(yùn)行時(shí),若要在名為Form1的窗體標(biāo)題上顯示“刪數(shù)”,可以在Form  Load事件處理過(guò)程中添加語(yǔ)句為
     
    (單選,填字母:A.Form1.Text=“刪數(shù)“\B.Form1.Caption=“刪數(shù)“\C.Form1.AddItem“刪數(shù)“)
    (2)實(shí)現(xiàn)上述功能的VB程序代碼如下,請(qǐng)?jiān)跈M線處填入合適的代碼。
    Private Sub CmdRun_ Click (  )
    Dim Num As String,New_num As String'Num為輸入的數(shù)字字符串
    Dim i As Integer,j As Integer,m As Integer,
    Dim As Integer,s As Integer,k As Integer
    Dim a(30)As String,b(30)As Integer
    Num=Text1.Text:s=Len(Num)
    k=Val (Text2.Text)'k為刪除數(shù)字個(gè)數(shù)
    For  i=1  To  s
    a(i)=Mid(Num,i,1)
    Nexti
    j=1
    m=1
    n=①
     

    For i=m+l To n'取第一個(gè)非零最小數(shù)字
    If  菁優(yōu)網(wǎng)   Then m=I'加框處程序代碼有誤,請(qǐng)改正
    Next i
    b(j)=m
    Do Whil②
     
    '取其他最小數(shù)字
    m=m+1
    n=n+1
    For i=m+1 To  n
    If  a(i)<a(m) Then m=i
    Next i
    j=j+1:b(j)=m
    Loop
    For i=m+1 To  s'最后直接取的數(shù)字
    j=j+1:b(j)=i
    Next i
    For j=1 To s-k'輸出最小數(shù)
    New_ num③
     

    Next j
    Labell.Caption=New_num
    End Sub
    (3)加框處程序代碼有誤,請(qǐng)改正。
     

    組卷:2引用:1難度:0.2
  • 16.在平面直角坐標(biāo)系中,給定一個(gè)矩形左下和右上2個(gè)坐標(biāo)點(diǎn)即可確定該矩形,例如左下(1,1)、右上(5,4),則矩形如圖a所示。
    菁優(yōu)網(wǎng)
    現(xiàn)給定若干個(gè)小矩形的坐標(biāo)點(diǎn),要求判斷能否構(gòu)建出一個(gè)新的大矩形,在大矩形中,各構(gòu)成的小矩形無(wú)重疊,無(wú)空白。
    例1:給定的5個(gè)小矩形能夠精確構(gòu)建一個(gè)坐標(biāo)為(1,1)、(5,4)的大矩形。
    小矩形左下,右上坐標(biāo)如下:5個(gè)小矩形精確構(gòu)建一個(gè)大矩形(圖b):
    例2:給定的3個(gè)小矩形,有相交區(qū)域,有空白區(qū)域,不能精確構(gòu)建成一個(gè)大矩形(圖c)。
    在任何兩個(gè)小矩形坐標(biāo)不完全相同的情況下,判定能否精確構(gòu)建大矩形的算法如下:
    構(gòu)成的大矩形面積等于每個(gè)小矩形的面積之和;
    獲取每個(gè)小矩形的所有坐標(biāo)點(diǎn),有且僅有四個(gè)點(diǎn)只出現(xiàn)一次,其他坐標(biāo)點(diǎn)成對(duì)出現(xiàn)。
    (1)給定3個(gè)矩形左下和右上坐標(biāo)依次為[2,4],[5,5],[3,2],[4,4],[4,2],[5,4],請(qǐng)你再添加一個(gè)矩形坐標(biāo),使4個(gè)矩形精準(zhǔn)構(gòu)建一個(gè)大矩形,則添加矩形左下和右上坐標(biāo)依次為
     
    。
    (2)根據(jù)上述算法描述,用VB程序?qū)崿F(xiàn)代碼如下,請(qǐng)?jiān)诋?huà)線處填入合適的代碼。
    Const n=5'常量n存儲(chǔ)小矩形個(gè)數(shù)
    Dim a(1 To 2*n)As Integer'存儲(chǔ)每個(gè)小矩形給定X軸坐標(biāo)
    Dim b(1 To 2*n)As Integer'存儲(chǔ)每個(gè)小矩形給定Y軸坐標(biāo)
    Private Sub Form_Load
     

    '本過(guò)程讀取每個(gè)小矩形X軸坐標(biāo)存儲(chǔ)在數(shù)組a中、每個(gè)小矩形Y軸坐標(biāo)存儲(chǔ)在數(shù)組b中,并在List1中顯示代碼略
    End Sub
    Private Sub Command1_Click
     

    Dim c(1 To 4*n)As Integer'存儲(chǔ)每個(gè)小矩形所有X軸坐標(biāo),1~2*n存左下和右上,2*n+1~4*n存左上和右下
    Dim d(1 To 4*n)As Integer'存儲(chǔ)每個(gè)小矩形所有Y軸坐標(biāo),1~2*n存左下和右上,2*n+1~4*n存左上和右下
    Dim mc(1 To 4*n)As Integer'記錄所有坐標(biāo)是否成對(duì)重復(fù),不重復(fù)為1,重復(fù)為0
    Dim temp As Integer
    Dim i As Integer,j As Integer,f As Integer
    Dim sum As Integer,sumt As Integer,count As Integer
    For i=1 To 2*n Step 2
    sum=sum+(a(i+1)-a(i))*(b(i+1)-b(i))
    Next i
    f=1
    For i=1 To 2*n
    c(i)=a(i)
    c(n*2+i)=a(i)
    d(i)=b(i)
    d(n*2+i)=b(i+f)
     ①
     

    Next i
    For i=1 To 4*n-1
    For j=1 To 4*n-i
    If c(j)>c(j+1)Or c(j)=c(j+1)And d(j)>d(j+1)Then
    temp=c(j):c(j)=c(j+1):c(j+1)=temp
    temp=d(j):d(j)=d(j+1):d(j+1)=temp
    End If
    Next j
    Next i
    sumt=②
     

    If sum<>sumt Then
    Label1.Caption=“不能精確構(gòu)建”
    Exit Sub'結(jié)束當(dāng)前過(guò)程,不再執(zhí)行后續(xù)程序
    Else
    For i=1 To 4*n
    mc(i)=1
    Next i
    i=1
    Do While i<4*n
    If c(i)=c(i+1)And d(i)=d(i+1)Then
    mc(i)=0:mc(i+1)=0
    i=i+2
    Else
    i=i+1
    End If
    Loop
    count=0
    For i=1 To 4*n
     ③
     

    Next i
    If count=4 Then Label1.Caption=“能精確構(gòu)建“Else Label1.Caption=“不能精確構(gòu)建”
    End If
    End Sub

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