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

2018-2019學(xué)年浙江省臺州市臨海市白云高級中學(xué)高三(下)月考信息技術(shù)試卷(3月份)

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

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

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

    組卷:63引用:3難度:0.6
  • 2.阿里首家未來酒店菲住布渴(FlyZoo Hotel)于2018年12月開業(yè),是全球首家支持全場景刷臉住宿的酒店,刷臉辦理入住,智能機(jī)器人服務(wù),“各顯神通”的智能門鎖,“天貓精靈”智慧客房體驗(yàn),手機(jī)一鍵退房,都給客人帶來了無上的體驗(yàn)。以上材料中不屬于人工智能的是( ?。?/h2>

    組卷:39引用:3難度:0.6
  • 3.使用Word軟件編輯某文檔,部分界面如圖所示。下列說法正確的是( ?。?br />菁優(yōu)網(wǎng)

    組卷:40引用:3難度:0.5
  • 4.以下關(guān)于數(shù)據(jù)庫的說法正確的是(  )

    組卷:11引用:2難度:0.4
  • 5.某算法的部分流程圖如圖所示。輸入n的值為100執(zhí)行這部分流程后,輸出的值為(  )菁優(yōu)網(wǎng)

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

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

  • 16.數(shù)組nam ( ?。ex ( ?。ath ( ?。u ( ?。┓謩e存放學(xué)生的姓名、性別、數(shù)學(xué)和總分成績,現(xiàn)要求編寫一個(gè)程序使得數(shù)據(jù)按照男生“總分”的降序和女生“總分”的升序排列,其中男生在前女生在后,程序界面如圖所示:
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)該功能的VB程序如下,但加框處代碼有錯(cuò),請改正。
    Dim nam(100)As String'存放學(xué)生姓名
    Dim sex(100)As String'存放學(xué)生性別
    Dim math(100)As Long'存放學(xué)生數(shù)學(xué)成績
    Dim su(100)As Long'存放學(xué)生總分成績
    Dim k As Integer'k變量用來存學(xué)生人數(shù)
    Private Sub Form_Load (  )
    ‘將數(shù)據(jù)庫中的數(shù)據(jù)分別存儲在相應(yīng)的變量中并在列表框中顯示出來
    ‘代碼略
    End Sub
    Private Sub Command1_Click ( ?。?br />Dim mmax As Integer,gmax As Integer,flagm As Boolean,flagg As Boolean
    i=1:flagm=True:flagg=True
    Do While 菁優(yōu)網(wǎng)
    mmax=0:gmax=0
    flagm=False:flagg=False
    For j=i To k-i+1
    If sex(j)=“男“And su(j)>su(mmax) Then mmax=j
    If sex(j)=“女“And su(j)>su(gmax) Then gmax=j
    Next j
    If mmax<>0 Then
    flagm=True
    t=nam(mmax):nam(mmax)=nam(i):nam(i)=t
    t=sex(mmax):sex(mmax)=sex(i):sex(i)=t
    t=math(mmax):math(mmax)=math(i):math(i)=t
    t=su(mmax):su(mmax)=su(i):su(i)=t
    End If
    If gmax<>0 Then
    flagg=True
    If 菁優(yōu)網(wǎng)Then②
    gmax=mmax
    t=nam(gmax):nam(gmax)=nam(k-i+1):nam(k-i+1)=t
    t=sex(gmax):sex(gmax)=sex(k-i+1):sex(k-i+1)=t
    t=math(gmax):math(gmax)=math(i):math(i)=t
    t=su(gmax):su(gmax)=su(k-i+1):su(k-i+1)=t
    Else
    t=nam(gmax):nam(gmax)=nam(k-i+1):nam(k-i+1)=t
    t=sex(gmax):sex(gmax)=sex(k-i+1):sex(k-i+1)=t
    t=math(gmax):math(gmax)=math(k-i+1):math(k-i+1)=t
    t=su(gmax):su(gmax)=su(k-i+1):su(k-i+1)=t
    End If
    End If
    i=i+1
    Loop
    For i=1 To k
    List2.AddItem nam(i)+““+sex(i)+““+Str(math(i))+““+Str(su(i))
    Next i
    End Sub
    程序中①處改為
     

    程序中②處改為
     
    。

    組卷:6引用:1難度:0.2
  • 17.某數(shù)據(jù)加密方法描述如下:
    ?先將字符轉(zhuǎn)化為二進(jìn)制的位數(shù)據(jù)并顯示在文本框text2中,數(shù)據(jù)位數(shù)顯示在標(biāo)簽Label1中
    ?以16個(gè)數(shù)據(jù)為一段,將k個(gè)待加密數(shù)據(jù)依次分割成若干個(gè)數(shù)據(jù)段,剩余數(shù)據(jù)(個(gè)數(shù)小于16)為獨(dú)立數(shù)據(jù)段。
    ?數(shù)據(jù)加密規(guī)則:
    數(shù)據(jù)個(gè)數(shù)等于16的數(shù)據(jù)段,在段內(nèi)進(jìn)行位置變換,得到加密數(shù)據(jù)段。
    數(shù)據(jù)個(gè)數(shù)小于16的數(shù)據(jù)段,直接得到加密數(shù)據(jù)段。
    ?依次合并加密數(shù)據(jù)段,即為最后的加密數(shù)據(jù)。
    位置變換的規(guī)制,方法如下:
    菁優(yōu)網(wǎng)
    具體界面如圖所示:
    菁優(yōu)網(wǎng)
    (1)已知k=38,則數(shù)組元素b(26)對應(yīng)值是數(shù)組a中的。
    (2)實(shí)現(xiàn)該功能的VB程序如下,請?jiān)跈M線處填入合適的代碼:
    Private Sub Command1_Click (  )
    Dim a(1 To 1000)As Integer,b(1 To 1000)As Integer
    Dim n As Integer,m As Integer
    Dim s As String,s1 As String,c As Integer,ch As String
    s=Text1.Text:Text2.Text=““
    n=Len(s)
    k=1
    For i=1 To n'獲取字符的二進(jìn)制數(shù)據(jù)存放在數(shù)組a
     

    n=Asc(Mid(s,i,1))
    Do While n<>0
    a(k)=n Mod 2
    n=n\2
    Text2.Text=Text2.Text+Str(a(k))
    k=k+1
    Loop
    Next i
                  ①

    List1.Clear
    For m=1 To (k-1)\16'對字符二進(jìn)制按規(guī)則進(jìn)行位變換,變換后的數(shù)據(jù)存放在數(shù)組b
     
    中并輸出
    For i=1 To 4
    b(16*(m-1)+4*(i-1)+1)=a((m-1)*16+i)
               ②

    Next i
    For i=1 To 3
    b(16*(m-1)+4*(i-1)+3)=a((m-1)*16+10+i)
    b(16*(m-1)+4*(i-1)+2)=a((m-1)*16+17-i)
    Next i
    For i=1 To 2
    b(16*(m-1)+13+i)=a((m-1)*16+4+i)
    Next i
    For i=1 To 4
    s1=““
    For j=1 To 4
    s1=s1+Str(b(16*(m-1)+(i-1)*4+j))
    Next j
    List1.AddItem s1
    Next i
    List1.AddItem““
    Next m

    s1=““
    For i=((k-1)\16)*16+1 To k-1
    b(i)=a(i)
    If         ③
    Then
    s1=s1+Str(a(i))
    List1.AddItem s1
    s1=““
    Else
    s1=s1+Str(a(i))
    End If
    Next i
    List1.AddItem s1
    Text3.Text=““
    For i=1 To k-1
    Text3.Text=Text3.Text+Str(b(i))
    Next i
    End Sub
    (1)實(shí)現(xiàn)上述功能,請?jiān)跈M線處填入適當(dāng)?shù)拇a:
    程序中①處填入的是
     
    。
    程序中②處填入的是
     

    程序中③處填入的是
     
    。

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