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

2016-2017學(xué)年浙江省新高考研究聯(lián)盟高三(上)第三次聯(lián)考信息技術(shù)試卷

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

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

  • 1.信息安全危害的兩大源頭是病毒和黑客,因?yàn)楹诳褪牵ā 。?/h2>

    組卷:5引用:2難度:0.9
  • 2.電子郵件的傳送的基本流程如圖所示.
    菁優(yōu)網(wǎng)
    其中的過程③中使用的協(xié)議是( ?。?/h2>

    組卷:12引用:4難度:0.9
  • 3.要在Word中達(dá)到如下圖所示的圖文混排效果,需要設(shè)置圖片的環(huán)繞方式為( ?。?br />菁優(yōu)網(wǎng)

    組卷:27引用:7難度:0.9
  • 4.關(guān)于下面這個(gè)Access數(shù)據(jù)表,以下說法正確的是( ?。?img alt="菁優(yōu)網(wǎng)" src="http://img.jyeoo.net/quiz/images/201710/220/7956e8e7.png" style="vertical-align:middle" />

    組卷:3引用:2難度:0.7
  • 5.有如下一段VB程序:
    k=-20
    Do While k=0
    k=k+1
    Loop
    以下說法正確的是( ?。?/h2>

    組卷:10引用:2難度:0.7

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

  • 16.對(duì)分查找算法可用于求解方程的近似解.現(xiàn)要求方程x3-4x2+x+5=0的一個(gè)近似解,可設(shè)f(x)=x3-4x2+x+5,若有區(qū)間[a,b],使f(a)與f(b)異號(hào),則該區(qū)間內(nèi)必存在該方程的一個(gè)解.小吳為此編寫了VB程序,功能如下:分別在文本框Text1和Text2中輸入求解的區(qū)間值a和b(a<b),單擊“計(jì)算”按鈕Command1,若該區(qū)間必有解,則求解出該區(qū)間內(nèi)的一個(gè)近似解(精確到10-5),否則提示“重新輸入?yún)^(qū)間”,計(jì)算后的相關(guān)結(jié)果顯示在列表框List1中.程序運(yùn)行界面如圖所示.
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)上述功能的VB程序如下,但加框處代碼有錯(cuò),請(qǐng)改正.
    Function f(x As Double) As Double
    Dim y As Double
    y=x^3-4*x^2+x+5:菁優(yōu)網(wǎng)(1)
    End Function
    Private Sub Command1_Click (  )
    Dim a As Double,b As Double,m As Double,x As Double
    a=Val(Text1.Text):b=Val(Text2.Text)
    If f(a)*f(b)<0And a<b Then
    Do While a<=b
    m=(a+b)/2
    If Abs(f(m))<0.00001Then Exit Do
    If 菁優(yōu)網(wǎng)<0  Then'(2)
    b=m
    Else
    a=m
    End If
    Loop
    x=Format(m,“0.00000“)'Format函數(shù)用于定義輸出的小數(shù)位數(shù)
    List1.AddItem“[“& Text1.Text &“,“& Text2.Text &“]“&“解為:“& x
    Else
    List1.AddItem“[“& a &“,“& b &“]“&“重新輸入?yún)^(qū)間“
    End If
    End Sub.

    組卷:2引用:1難度:0.1
  • 17.小林很期待建國(guó)100年大慶的盛典,在學(xué)習(xí)了VB程序設(shè)計(jì)后,他設(shè)計(jì)一個(gè)VB應(yīng)用程序,在Text1、Text2、Text3中輸入當(dāng)天的年、月、日,點(diǎn)擊命令按鈕Command1,程序在標(biāo)簽Label4上顯示離2049年10月1日還有多少天,程序運(yùn)行界面如圖所示
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)跈M線處填入合適代碼.
    Dim mon(1To 12)As Long
    Sub makemonth ( ?。?br />mon(1)=31:mon(2)=28:mon(3)=31:mon(4)=30:mon(5)=31:mon(6)=30
    mon(7)=31:mon(8)=31:mon(9)=30:mon(10)=31:mon(11)=30:mon(12)=31
    End Sub
    Function isp(y as Integer) As
     
    '判斷是否閏年
    If y Mod 400=0Then
    isp=True
    ElseIf y Mod 100<>0And y Mod 4=0Then
    isp=True
    Else
    isp=False
    End If
    End Function
    Private Sub Command1_Click (  )
    Dim y As Long,m As Long,d As Long
    Dim cnt As Long
    y=Val(Text1.Text)
    m=Val(Text2.Text)
    d=Val(Text3.Text)
    Call makemonth'預(yù)定義每個(gè)月最大天數(shù)
    cnt=0
    Do While (y<>2049)Or (m<>10)Or (d<>1)
    cnt=cnt+1
     

    md=mon(m)
    If m=2And isp(y)=True Then
     

    If d>md Then
    d=1
    m=m+1
    End If
    If m>12Then
    m=1
    y=y+1
    End If
    Loop
    Label4.Caption=“到2049年10月1日還有“+Str(cnt)+“天“
    End Sub              其中,(1)、(2)、(3)處語句分別填
     
    、
     
    、
     

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