資源簡介

瑞安市新紀元高中11468100121666002019學年度第二學期
2018級高二期末考試——技術試題卷
（本試卷滿分共100分，考試時間:90分鐘）
第一部分 信息技術(共 50 分)
一、選擇題(本大題共 12 小題，每小題 2 分，共 24 分。每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分)
1.關于信息和信息處理，下列描述錯誤的是（）
A．人的大腦是信息的載體
B. 信息在傳輸過程中不會發生信息丟失
C. 計算機處理信息的優勢之一是計算速度快
D. 計算機錄音過程中涉及對聲音信息的加工處理
2.關于信息的表達與交流，下列描述正確的是（）
A.在某購物網站按商品類別進行查詢信息屬于主題目錄檢索
B.網頁中的超鏈接只能鏈接到網頁，不能指向圖片、文件等
C.SMTP 協議的功能是讓收件人從郵件服務器中將郵件讀到本地計算機
D.在瀏覽器中執行“另存為”操作保存網頁內容的同時，也保存了該網頁的 URL
14306552482853.某學生選課系統采用數據庫來管理相關信息，其數據庫部分界面如圖所示。
下列說法正確的是（）
A.該數據庫不能存儲圖像
B.當前數據表中可以有兩條相同“學號”的記錄
C.用戶發出刪除記錄等操作指令，不需要數據庫管理系統去實現
D.選課系統的各用戶可以同時訪問數據庫，體現了數據庫的共享性
4.關于信息編碼，下列描述正確的是（）
A.GB2312 漢字編碼屬于機內碼
B.掃描條形碼是信息的編碼過程
C.可以使用十六進制數對信息進行編碼
D.使用 4 位二進制數可以實現對某班 40 個學號進行編碼
11906252698755. 使用 Photoshop 軟件制作“漁舟唱晚”作品，部分界面如圖所示。下列說法正確的是（）
A.“古詩”圖層可以直接設置“風”濾鏡
B.可以在“小舟”圖層用仿制圖章工具進行仿制圖像
C.交換“小舟”與“山脈”圖層的順序，不影響作品的呈現效果
D.將文檔儲存為 JPEG 格式文件，“白鷺”圖層中的圖像內容可見
12687302660656. 用 GoldWave 軟件制作一段音頻，部分界面如圖所示。若在當前狀態下插入10秒靜音，按原參數保存，則聲音文件儲容量約為（）
A. 6.73MB B.8.41MB C.16.82MB D.26.91MB
7. 下列 VB 表達式中，計算結果與其他不同的選項是（）
A. 2 Mod 8 + 1 B. Len("2") + 1
C. Sqr(Abs(23-32)) D. 27 Mod 8 \ 2
8. 某算法的部分流程圖如圖所示。執行這部分流程，若輸入 n 的值為 501，則輸出 i 的值為（）
351917061595A.3
B.4
C.5
D.60
9.有如下 VB 程序段：
s = 0: k = 0
For i = 1 To 4
t = a(i)
a(i) = k + t
k = t
s = s + a(i)
Next i
Text1.Text = Str(s)
數組元素 a(1)至 a(4)的值依次為“1，3，2，0”，執行該程序段后，文本框 Text1 中顯示的是（）
A.9 B.10 C.11 D.12
10. 已知一個含有 n 個不重復整數的數組 a，i 和 j 表示數組下標（iPrivate Sub Command1_Click()
Dim s As Integer, b As Integer
s = 0: b = a(1) + 1
For i = 2 To n
109029567945(1)
109029575565(2)
Next i
Label1.Caption = Str(s)
End Sub
Function max(x As Integer, y As Integer)
299275584455203073087630If x > y Then (3) Else (4)
End Function
方框中的代碼由以下四部分組成:
①max = y ②max = x ③b = max(b, a(i) + i) ④s = max(s, a(i) - i + b)
代碼順序正確的是（）
A.④③①② B.③④②① C.③④①② D.④③②①
11. 有如下 VB 程序段：
m = Int(Rnd * 4 + 2)
For i = 1 To 6 - m
For j = 1 To 6 - i
If a(j) - a(j + 1) < 0 Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t
End If
Next j
Next i
數組元素a(1)到 a(6)的值依次為“49，45，5，61，42，71”，執行該程序段后，a(1)～a(6)各元素值不可能的是（）
A.61,49,71,45,42,5 B.49,45,61,42,71,5
C.49,61,45,71,42,5 D.71,61,49,45,42,5
12. 有如下 VB 程序段：
Key = Val(Text1.Text)
i = 1: j = 10: c = 0
Do While i <= j
m = (i + j) \ 2
c = c + 1
If a(m) >= Key Then j = m – 1 Else i = m + 1
Loop
Text2.Text = Str(c) + Str(i) + Str(j) + Str(m)
數組元素 a(1)至 a(10)的值依次為“8，10，12，15，15，15，21，34，45，66”。在文本框Text1 中輸入數值 15，執行該程序段后，文本框 Text2 中顯示的內容是（）
A.3 3 2 3 B.4 4 3 4 C.4 7 6 7 D.3 4 3 3
二、非選擇題（本大題共 4 小題，其中第 13 小題 4 分，第 14 小題 8 分，第 15 小題 7 分，
第 16 小題 7 分，共 26 分）
2428240392811013 題圖a
13 題圖a
110426525781013. 使用 Excel 軟件處理浙江省行政區域相關數據，部分數據如第 13 題圖 a 所示。
請回答下列問題:
（1）區域 J3:J13 的數據是通過公式計算得到的：在 J3 單元格中輸入公式____________，再利用自動填充功能完成區域 J4:J13 的計算。（提示：COUNTIF 函數用于統計某個區域滿足條件的單元格個數。例如：=COUNTIF(H3:H13,B3）表示在數據區域 H3:H13 中統計數值等于 B3 單元格值的個數。）
8445501106170（2）對第 13 題圖 a 中的數據區域 A2:F92 按第 13 題圖 b 所示的條件進行排序(文本按字母排序)，結合“各地級市相關數據統計表”分析,則排序后湖州市面積最小的縣級行政區的行號為_____。
第 13 題圖 b
（3） 縣級行政區的代碼前 4 位與該縣級行政區所在地級市代碼的前 4 位是相同的。現將第13 題圖 a 中 A1:F92 的數據復制至新工作表中，若要篩選出衢州市各縣級行政區域相關信息，下列篩選方式可行的是______(多選，填字母)
40341551206514312901905A. B.
401193076200143700552705 C. D.
14. 用 Flash 軟件打開制作“致敬逆行者.fla”文件，編輯界面如第 14 題圖所示。1707515334645
第 14 題圖
請回答下列問題:
（1） 下學列屬于創作需求分析的是____(多選，填字母:A.將作品定位為演示型/ B.設計
作品的主要界面/ C.作品將以SWF格式在網絡上發布/ D.確定制作該作品所需軟件和硬件/E. 分析作品主網要面向的用戶)。(注:全部選對的得 2 分，選對但不全的得 1 分，不選或者有選錯的得 0 分)
（2） 不改變動畫幀數，若要使當前場景動畫播放時長調整為 5 秒，則需設置 Flash 文檔
幀頻為____fps。
（3） 在當前狀態下，下列說法不正確的是____（單選，填字母：A.庫中至少有 5 個元件/B.可以將“音樂”圖層移至“背景”圖層下方/ C.可以將“人物”圖層第 1 幀對象的 Alpha值修改為 50%/ D.“文字”圖層第 1 幀至第 40 幀的動畫類型是逐幀動畫）
（4） 若要使“音樂”圖層的聲音與“人物”圖層動畫同時開始播放，并在該場景動畫結束
后聲音繼續播放，正確的操作是____________________________________________。
（5） 測試影片時，單擊“進入”按鈕，停止當前聲音的播放，然后跳轉到“戰斗”場景第
1 幀繼續播放，則該“進入”按鈕的動作腳本是 on(press){ }。
1620520105156015. IPV4 點分十進制 IP 地址可轉換為十進制數字形式。編寫“模擬 IP 過濾器”程序，程序功能如下: 程序運行時，在列表框 List1 中顯示能通過過濾的 IP 區間（IP 區間按起始端點升序排序），在文本框 Text1 中輸入需要判斷的 IP 地址，單擊“驗證”按鈕 Cmd1，若 IP 區間有重疊區間則作合并處理，并顯示在列表框 List2 中，然后對輸入的 IP 地址進行判斷，判斷結果顯示在標簽 Label4 中。程序運行界面如圖所示：
（1）Cmd1 對象 屬于_____類（單 選，填字母 ：A.Form/ B.Label/ C.TextBox /D.CommandButton）。
（2） 實現上述功能的 VB 程序如下，請在劃線處填入合適的代碼。
（3） 程序中加框處代碼有錯，請改正。
Dim a(1 To 100) As Integer, n As Integer
Private Sub Form_Load()
'本過程從數據庫中讀取 n 個IP 地址區間數據，并依次存入數組 a(1)、…、a(2*n)中
'對能通過過濾的 IP 區間按區間起始端點升序排序
'代碼略
End Sub
Private Sub Cmd1_Click()
Dim ip As Integer, L As Integer, R As Integer
Dim i As Integer, pos As Integer, f As Boolean
ip = Val(Text1.Text)
L = a(1): R = a(2): i = 3: pos = 1 '合并重疊區間
Do While i <= 2 * n - 1
If ① Then
If a(i + 1) > R Then R = a(i + 1)
Else
a(2 * pos - 1) = L：a(2 * pos) = R
pos = pos + 1
L = a(i)
R = a(i + 1)
End If
②__________
Loop
a(2 * pos - 1) = L: a(2 * pos) = R '依次輸出排序合并后的區間數據，代碼略
59626576200If ip < a(1) And ip > a(pos) Then '判斷請求的 IP 地址
Label4.Caption = "IP 需過濾"
Else
i = 1: f = False
Do While i <= pos And Not f
If ③ Then
i = i + 1
Else
Label4.Caption = "IP 不需過濾" f = True
End If
Loop
If f = False Then Label4.Caption = "IP 需過濾"
End If
End Sub
某小賣部商品相關數據分別存放在相應的數據表中，如第 16 題圖 a 和圖 b 所示。
241236574930117602083820第 16 題圖 a 第 16 題圖 b
編寫“商品銷售統計”程序功能如下：窗體加載時從數據庫中讀取商品的相關數據，對各商品類別總銷量及名次進行統計，結果在列表框 List1 中顯示；單擊“查詢”按鈕 Command1， 按商品類別編號從小到大排列，同一類別商品按銷量從大到小排序，在列表框 List2 中顯示。程序運行界面如第 16 題圖 c 所示。
118427552705第 16 題圖 c
（1） 閱讀程序可知，gtype(b(3))的初始值為__________。
（2） 請在劃線處填入合適的代碼。
Dim a(1 To 2000) As Integer, b(1 To 2000) As Integer, s(1 To 2000) As Integer
Dim gid(1 To 100) As Integer, t(1 To 2000) As Integer
Dim c(1 To 2000) As String, gtype(1 To 100) As String
Dim ts(1 To 100) As Integer '數組 ts 存儲每個類別商品總銷量
Dim k(1 To 2000) As Integer '數組 k 存儲每個類別商品總數
Dim m As Integer, n As Integer
Private Sub Form_Load()
'從數據庫讀取 m 條記錄中類別編號、商品類別數據分別存儲在數組 gid、gtype 中
'從數據庫讀取n 條記錄中類別編號、商品名稱、商品銷量數據分別存儲在數組 b、c、s中，代碼略
For i = 1 To n '統計各類別商品總銷量及商品總數
①
k(b(i)) = k(b(i)) + 1
Next i
For i = 1 To m '計算各類別商品總銷量的名次
p = 0
For j = 1 To m
If ts(i) < ts(j) Then p = p + 1
mc(i) = p + 1
Next j
Next i
List1.AddItem "類別 銷量 名次"
For i = 1 To m
List1.AddItem gtype(i) + " " + Str(ts(i)) + " " + Str(mc(i))
Next i
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, pos As Integer, tmp As Integer, p As Integer
p = 1
For i = 1 To m
a(i) = p
p = p + k(i)
Next i
For i = 1 To n
p = b(i)
t(a(p)) = i
a(p) = a(p) + 1
Next i
pos = 1
For i = 1 To m '對各類別商品按商品銷量進行排序
For j = pos To pos + k(i) - 2
②
tmp =t(j): t(j) = t(p): t(p) = tmp
Next j
pos = pos + k(i)
Next i
List2.AddItem "類別 商品 商品銷量"
For i = 1 To n
List2.AddItem ③ + " " + geshi(c(t(i))) + " " +Str(s(t(i)))
Next i
End Sub
Function f(head As Integer, tail As Integer) As Integer
Dim i As Integer, p As Integer
p = head - 1
For i = head To tail
If s(t(i)) > s(t(p)) Then p = i
Next i
f = p
End Function
Function geshi(s As String) As String '格式輸出，代碼略
End Function
信息技術答案
選擇題
1
2
3
4
5
6
7
8
9
10
11
12
B
A
D
C
C
B
B
A
D
D
D
B
非選擇題
13.（1）=COUNTIF(B$3:B$92,H3)或=COUNTIF($B$3:$B$92,H3)
或=COUNTIF(B$3:B$92,$H3)或=COUNTIF($B$3:$B$92,$H3) （1分）
（2）20 （1分）
（3）ABD （2分）
14.（1）ACD （2分） （全部選對的得2分，選對但不全的得1分，不選或有選錯的得0分）
（2）8 （1分）
（3）C （1分）
（4）將“音樂”圖層第10幀移至第1幀，并將聲音同步方式修改為事件
或在音樂圖層的第一幀執行“清除關鍵幀”命令，并將聲音同步方式修改為事件 （2分）
（5）stopAllSounds(); gotoAndPlay(“戰斗”,1);或 stopAllSounds();play() （2分）
批改注意：本題兩條命令先后順序不能調換；nextScene(); nextFrame();是錯的，
這兩個腳本都是播放下個場景并停止在第1幀；
15.（1）D （1分）
（2 ①a(i)<=R （2分）
②i=i+2 （1分）
③Not(ip>=a(2*i-1) And ip<=a(2*i))或a(2 * i - 1) > ip Or a(2 * i) < ip（2分）
（3）ip < a(1) Or ip > a(2 * pos) （1分）
16.（1）“餅干” （1分）
（2）①ts(b(i)) = ts(b(i)) + s(i) （2分）
②p = f(j + 1, pos + k(i) - 1) （2分）
③gtype(b(t(i))) （2分）

展開更多......

收起↑