2017-2018學(xué)年浙江省“七彩陽(yáng)光”新高考研究聯(lián)盟高二(下)期中信息技術(shù)試卷
發(fā)布:2024/4/20 14:35:0
一.選擇題:(本大題共12小題,每小題2分,共24分.在每小題給出的四個(gè)選項(xiàng)中,只有一個(gè)符合題目要求)
-
1.關(guān)于信息技術(shù)的說(shuō)法,正確的是( )
組卷:21引用:1難度:0.5 -
2.用郵件客戶端收取郵件時(shí),使用下列哪個(gè)協(xié)議( )
組卷:8引用:6難度:0.9 -
3.小張?jiān)谝环蓦s志上到看到有關(guān)“區(qū)塊鏈”知識(shí)的介紹,他用掃描儀掃描以后得到了一個(gè)“區(qū)塊鏈技術(shù)。jpg”的文件,使用OCR軟件進(jìn)行字符識(shí)別,部分界面如圖所示。下列說(shuō)法不正確的是( ?。?br />
組卷:13引用:2難度:0.3 -
4.下列說(shuō)法正確的是( ?。?/h2>
組卷:4引用:1難度:0.7 -
5.某算法的部分流程圖如圖所示,執(zhí)行這部分流程,輸出結(jié)果為( ?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/201904/117/df7933b2.png" style="vertical-align:middle" />
組卷:3引用:1難度:0.4
二.非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
-
16.某活動(dòng)要從 100 名參賽者中選出成績(jī)最高的前十名給予一定的獎(jiǎng)勵(lì)。活動(dòng)組織者編 寫了如下程序,功能是根據(jù)成績(jī)進(jìn)行排序,程序中數(shù)組 a 保存所有參賽者的組次,數(shù)組 b 保存對(duì)應(yīng) 的成績(jī),如第 1 位參賽者的組次 1 保存在 a(1)中,成績(jī)保存在 b(1)中。程序界面如圖所示,左邊 列表框 List1 中顯示原始數(shù)據(jù)(序號(hào)和相應(yīng)的成績(jī)),單擊“排序”按鈕(Command1),排序后的結(jié) 果按成績(jī)從高到低顯示前 10 名選手的序號(hào)和成績(jī)?cè)诹斜砜?nbsp;List2 中,若最后一名成績(jī)有相同的也 一起輸出。界面如圖所示:
實(shí)現(xiàn)上述功能的 VB 程序如下,但加框處代碼有錯(cuò),請(qǐng)改正。
Const n=100
Dim a(1 To n) As Integer
Dim b(1 To n) As Integer
Private Sub Form_Load ( )'窗體被加載時(shí)
‘獲取原始數(shù)據(jù),將參賽者序號(hào)和最后得分分別存在數(shù)組 a 和數(shù)組 b 內(nèi),并在列表框 List1 中 顯示。代碼略
End Sub
Private Sub Command1_Click ( ?。?br />Dim i As Integer,j As Integer,k As Integer,temp As Integer
List2.Clear
For i=1 To 10 k=i
‘①
If b(k)<b(j) Then k=j
End If
Next j
If k<>i Then
temp=b(i):b(i)=b(k):b(k)=temp temp=a(i):a(i)=a(k):a(k)=temp
End If
List2.AddItem Str(a(i))+““+Str(b(i)) Next i
m=10
For i=11 To n
Ifthen‘②
m=m+1
List2.AddItem Str(a(i))+““+Str(b(i)) End If
Next i
Label3.Caption=“本次十佳歌手一共有“+Str(m)+“組“End Sub組卷:2引用:1難度:0.5 -
17.某字符串(字節(jié)數(shù)為 2 的倍數(shù))編碼規(guī)則如下:
(1)將該字符串內(nèi)碼分成 2 個(gè)字節(jié)一組,每個(gè)字節(jié)前補(bǔ)上一個(gè) 0,構(gòu)成 9 位二進(jìn)制,順次鏈接后得 到 18 位二進(jìn)制;
(2)將得到的 18 位二進(jìn)制數(shù)字分成 3 組,每組 6 位;
(3)在每組數(shù)字前補(bǔ)上兩個(gè) 0,得到 3 個(gè)字節(jié)的二進(jìn)制數(shù);
(4)將(3)中得到的三個(gè)字節(jié)的二進(jìn)制數(shù)分別轉(zhuǎn)換為十進(jìn)制數(shù);
( 5 )將 每個(gè)十 進(jìn)制數(shù)轉(zhuǎn) 換為 1 個(gè)加 密字符,對(duì)應(yīng)的“密碼表”按數(shù) 值由小到 大依次 為“012345678ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz+/”小明按照上述方法,設(shè)計(jì)了一個(gè)字符串(僅包含 ASCII 字符)加密的 VB 程序,功能如下:?jiǎn)螕簟凹?nbsp;密”按鈕 Command1,程序依次將文本框 Text1 中每 2 個(gè)字符的 ASCII 碼值按編碼規(guī)則轉(zhuǎn)換為三個(gè)加 密字符,連接這些加密字符,最后在文本框 Text2 中輸出加密結(jié)果。程序效果如圖所示。
實(shí)現(xiàn)上述功能的 VB 程序如下:
(1)在 Text1 中輸入明文“AB”,用上述加密算法得到的密文為
(2)實(shí)現(xiàn)上述功能的 VB 程序如下。請(qǐng)?jiān)跈M線處填入合適的代碼。
Function cc(n As Integer) As String
Dim s As String
s=“012345678ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz+/“
①
End Function
Private Sub Command1_Click ( ?。?br />Dim n As Integer,s As String,i As Integer,ss As String
Dim a1 As Integer,a2 As Integer
Dim b1 As Integer,b2 As Integer,b3 As Integer s=Text1.Text
n=Len(s)
ss=““
For i=1 To nStep 2
a1=Asc(Mid(s,i,1))
②
b1=a1\8
b2=③
b3=a2 Mod 64
ss=ss+cc(b1)+cc(b2)+cc(b3)Next i
Text2.Text=ss
End Sub組卷:2引用:1難度:0.4