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

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

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

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

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

    組卷:17引用:3難度:0.9
  • 2.某論壇版主對(duì)一個(gè)“2016年中國大學(xué)排名”的帖子進(jìn)行“置頂”操作,這屬于信息資源評(píng)價(jià)中的(  )

    組卷:8引用:2難度:0.9
  • 3.使用Word軟件編輯文檔部分界面如下,以下說法正確的是(  )
    菁優(yōu)網(wǎng)

    組卷:16引用:7難度:0.9
  • 4.某Access數(shù)據(jù)表如圖所示,則以下說法中正確的是(  )
    菁優(yōu)網(wǎng)

    組卷:9引用:2難度:0.7
  • 5.閱讀如下程序,下列表達(dá)式與該程序段運(yùn)行結(jié)果相同的是( ?。?br />k=1:s=0,Do while i<=5,s=s+k/(i*(i+1)),i=i+1,k=-k,Loop.

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

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

  • 16.【加試題】設(shè)計(jì)VB程序,該程序?qū)⑤斎氲淖址行懽帜皋D(zhuǎn)換成大寫字母后輸出.在文本框Text1中輸入一串字符(數(shù)字、字母均可),單擊“轉(zhuǎn)換”按鈕Command1,在標(biāo)簽Label2中輸出結(jié)果.(提示:Asc(x):將字符x轉(zhuǎn)換為ASCⅡ碼值;Chr(x):將ASCⅡ代碼x轉(zhuǎn)換為所對(duì)應(yīng)的字符)該程序的設(shè)計(jì)界面如圖所示,請(qǐng)根據(jù)算法將下列程序補(bǔ)充完整.
    菁優(yōu)網(wǎng)
    Private Sub Command1_Click( ?。?br />Dim ch As String,s As String
    Dim i AS Integer,j As Integer
    ch=Text1.Text
    For i=1To
     

    j=Asc(Mid(ch,i,1))
    if j>96And j<123 Then
    s=s+Chr(j-32)
    Else
    s=s+Chr(j)
    End If
    Next
     

    End Sub
    完善程序:①橫線處代碼為
     

    ②橫線處代碼為
     

    組卷:12引用:2難度:0.1
  • 17.【加試題】對(duì)于函數(shù)f(x),若在某區(qū)間[a,b)內(nèi)是單調(diào)函數(shù),且其圖象與x軸有交點(diǎn),則存在一個(gè)x0使得f(x0)=0,我們可以設(shè)法找到x0的值.
    滿足上述條件的區(qū)間[a,b)和函數(shù)f(x)必定有f(a)?f(b)<=0,我們?cè)O(shè)計(jì)如下算法:第一步:區(qū)間中點(diǎn)m=
    a
    +
    b
    2

    第二步:若f(s)?f(m)<0,則含零點(diǎn)的區(qū)間為[a,m];否則,含零點(diǎn)的區(qū)間為[m,b),將新得到的含零點(diǎn)的區(qū)間仍記為[a,b].
    第三步:判斷[a,b)的長度是否小于一個(gè)足夠小的值d.若是,則m是方程的近似解;否則,返回第一步.
    于是我們可以設(shè)計(jì)函數(shù)f(x)=x2-c,就可以用此算法求出任意非負(fù)常數(shù)c的非負(fù)平方根.程序運(yùn)行效果如下圖所示,程序中還輸出了區(qū)間的左右端點(diǎn)和區(qū)間長度值.
    菁優(yōu)網(wǎng)
    Const min As Single=0.00005
    Dim c As Single
    Function fn(x As Single)As single
     

    End Function
    Private Sub Command1_Click( ?。?按鈕上的程序
    Dim a As Single,b As Single,m As Single
    c=Val(Text1.Text)
    a=0
    b=c
    Do While
     

    m=(a+b)/2
    List1.AddItem Str(a)&“”&Str(b)&“”Str(b-a)
    If
     
    Then
    b=m
    Else
    a=m
    End If
    Loop
    Label2.Caption=Str(m)
    End Sub
    回答以下問題:
    (1)事件處理過程“Command1_Click( ?。庇玫降乃惴ㄊ?!--BA-->
     
    (填算法具體名稱).
    (2)請(qǐng)將程序中的三處代碼補(bǔ)充完整.
    (3)通過測(cè)試可知,該程序得到的
    2
    的近似值為1.4142,實(shí)際上更精確的值是1.4142135623731,請(qǐng)問如何改善程序,得到一個(gè)更精確的近似值?請(qǐng)寫出至少兩種改善意見:
     

    組卷:15引用: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)改正