資源簡介

1134110010845800嘉興市2019~2020學年度第二學期期末檢測
技術試題卷 （2020.7）
考生須知：
本試題卷分兩部分，第一部分信息技術，第二部分通用技術。滿分100分，考試時間90分鐘。
1.考生答題前，務必將自己的姓名、準考證號用黑色字跡的簽字筆或鋼筆填寫在答題紙上。
2.選擇題的答案須用2B鉛筆將答題紙上對應題目的答案標號涂黑，如要改動，須將原填涂處用橡皮擦凈。
3.非選擇題的答案須用黑色字跡的簽字筆或鋼筆寫在答題紙上相應區域內，作圖時可先使用2B鉛筆，確定后須用黑色字跡的簽字筆或鋼筆描黑，答案寫在本試題卷上無效。
第一部分信息技術（共50分）
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題給出的四個選項中，只有一個是符合題目要求的，不選，多選，錯選均不得分）
1.下列有關信息及其特征的說法正確的是
A．信息必須依附于某種載體，載體是存儲信息的實體
B．信息是可以脫離它所反映的事物被存儲、保存和傳播
C．信息可以脫離載體進行傳遞和共享，在傳遞過程中沒有損耗
D．信息可以加工和處理使其具有更高的使用價值，但其形態肯定不會改變
2.下列關于瀏覽器及信息獲取的說法中正確的是
A．瀏覽器通過HTML協議獲取Web服務器的網頁內容信息
B．利用瀏覽器保存網頁中的文字和超鏈接就是保存網頁的URL
C．利用瀏覽器獲得的信息肯定可以通過統計評價來評判其真偽性
D． IE測覽器可以在收藏夾中創建不同文件夾用于不同種類網址的分類保存
3.下列說法中都體現人工智能技術應用的是
①使用人體測溫篩檢儀，實現人臉識別無感通關，迅速發現體溫異常者
②樓道LED聲控感應燈，在光線不足且有人走動時，自動感應亮燈
③使用控制軟件在家里對公司里的電腦進行遠程控制，完成文件下載等操作
④車輛進出停車場時，通過車牌識別技術自動完成車輛停車計費工作
A．①② B．②③ C．①④ D．②④
4.設計“小微圖書管理系統”時，新建“圖書借閱”Access數據表，存放下列表格數據：
以下有關“小微圖書管理系統”和Access數據表結構設計描述正確的是
A．“圖書編號” 字段的數據類型設置為“自動編號”
B．是否損壞”字段的數據類型設置為“是/否”或“文本”
C．“小微圖 書管理系統”屬于數據庫管理系統，可以為多個用戶共享使用
D．“小微圖書管理系統” 設計完成后，用戶必須直接打開該數據表添加記錄
5.有A、B兩段音頻，參數如下表所示：
則這兩段音頻文件的存儲容量之比（A ：B）約為
A．1：1 B．1：2 C．2：1 D．4：1
6.使用Photoshop軟件編輯“環保。psd”文件，當前狀態部分界面如圖所示：
下列說法正確的是
A．直接用“文字工具”調整文字圖層的文字大 B．不能直接清除“花”圖層的圖層樣式小
C．直接設置“蝴蝶”圖層的濾鏡效果 D．直接更改“背景”圖層的不透明度
7.有關VB表達式：Int（Rnd*10+1）*2，下列說法中正確的是
A．產生一個在[0，18]區間的隨機偶數
B．產生一個在[0，20]區間的隨機偶數
C．產生-一個在[2，18]區間的隨機偶數
D．產生一個在[2，20]區間的隨機偶數
8.某算法的部分流程圖如圖所示：執行這部分流程，當輸入i的值為57時，則輸出a和b的值分別是
A．2， 3 B．2，4 C．3， 3 D．3，4
9.已知變量a、b、c、d數據類型為Integer， 變量flag數據類型為Boolean。 下列選項中與其他語句功能不相同的是
A．If（a>b Or b>c）And flag=False Then d=a\2
B．If（a>b Or Not b<=c）And Not flag Then d=a\2
C．If Not（a<=b And b<=c）And flag=False Then d=a\2
D．If（a>b And b>c）Or Not flag Then d=a\2
10. 有如下Visual Basic程序段：
Private Sub Command1_Click （）
Dim x As Integer，r As Integer， s As String
x = Val（Text1. Text）： s =""
Do While x<>0
r=(x+1） Mod 2
s=Str（r）+s
x=x\2
Loop
Text2. Text = s
End Sub
該程序段運行后后，在文本框Text1中輸入25，則文本框Text2顯示的內容是
A．0 0 1 0 1 B．1 1 0 1 0 C．0 0 1 1 0 D．1 1 0 0 1
11.有如下Visual Basic程序段：
Private Sub Command1_ Click （）
Dim a（1 To 10） As Integer， i As Integer， k As Integer
a(1)=1：a(2)=17：a(3)=8：a(4)=9：a(5)=18
a(6)=15：a(7)=20：a(8)=13：a(9)=7：a(10)=11
k=0
For i= 2 To 9
If（a（i）-a（i-1））*（a（i+1）-a（i））< 0 Then k=k+1
Next
Text1. Text = Str （k）
End Sub
該程序段運行后后，文本框Text1中顯示的內容是
A． 6 B．7 C．8 D．9
12.利用對分查找實現在數組a中查找成績值為Key的學生姓名與成績（注：學生成績由高到低排序，并按姓名在前、成績在后的順序依次存儲在數組aa中，例如： “張三”，“97”， “李四”，。“92”，“王五” ，“87”……），編寫的VB程序段如下：
Const n = 100
Dim a（1 To n） As String
Private Sub Command1_ Cl ick （）
i=1：j = （1）
flag = False
Key = Val （Text1. Text）
Do While i <= j And Not flag
m= (2)
If Val（a（2 * m）） = Key Then
List1. AddItem a（2* m-1）+””+ a（2* m）： flag =True
Else
If (3) Then j= m-1 Else i=m+1
End If
Loop
If Not flag Then List1. AddItem”沒有找到！”
End Sub
上述程序段(1)、(2) 、(3) 三個方框處的語句依次為
①j=n ②j=n/2 ③m=(i+j）\2 ④m=(（i+j）\2）*2
⑤Val（a（2 * m）） < Key ⑥Val（a（m）） < Key ⑦Val（a（2 * m）） > Key
A．①④⑦ B．②③⑥
C．②③⑤ D．②④⑦
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
13.小周同學收集2018- 2019年某地區糧食作物播種面積與產量數據，使用Excel軟件進行數據處理，其中糧食類別分為春糧、夏糧和秋糧3類，畝產由產量、面積通過公式計算得到，如圖a所示。
請回答下列問題：
(1)如圖a所示，為了計算2019年三季糧食面積與產量占比（%）， 先在K4：K6單元格中分別輸入相應公式，得到三季糧食面積占比，然后復制區域K4：K6到區域L4：L6，得到2019年三季糧食產量占比。則L4單元格中的公式是_ （其中三季糧食產量占比為：各季糧食產量合計：三季糧食產量總和× 100）。
(2)若要對秋糧類作物按照2018年“面積”從高到低進行排序，則排序的數據區域是 。
(3)根據圖a中的數據制作了“2019年各類糧食畝產”的圖表，如圖b所示。
以下有關圖表的描述正確的是 （多選，填字母）。
A．該圖表的數據區域為F4：F9，F12：F16
B．若以圖c所示對圖a中的數據進行篩選操作，該圖表不會發生變化
C．若將H5：H17單元格的數值小數位數設置為1，該圖表不會發生變化
D．若隱藏圖a中的第10、11 行，該圖表會發生變化
E．將H6單元格中數據修改為0. 26，該圖表會發生變化
（注：全部選對的得2分，選對但不全的得1分，不選或者有選錯的得0分）
14.小李制作一個主題為“抗擊新冠病毒”的多媒體作品。請回答下列問題：
(1)創作多媒體作品需要進行腳本編寫。下列屬于腳本編寫的是 。（多選，填字母）
A．確定作品的主要界面
B．確定作品創作及運行時所需的硬件設施
C．根據作品的主題思想與內容，制作作品的腳本大綱
D．用表格形式來展示作品的屏幕畫面、鏈接關系和呈現說明等
E。將作品中各模塊所需媒體元素的獲取及處理方法列表進行表示
（注：全部選對得2分，選對但不全得1分，選錯得0分）
（2）如圖a所示，“人物”圖層第40幀的圖形對象由“人物”實例形成，其中第30幀到第40幀的補間類型是動畫補間，則該圖層第40幀到第50幀的補間類型是_ 。
(3)如圖a所示，“按鈕”圖層最后1幀已經添加動作腳本命令“Stop（）；"， 測試影片時，播放到最后動畫停止，“播放”按鈕不再顯示，造成按鈕消失的原因是 。
(4)“音樂”圖層的聲音同步方式如圖b所示，若不想改變其動畫播放效果，并讓音樂在播放2秒后停止播放，以下操作可行是_ 。（多選，填字母）
A．在“音樂”圖層的第25幀執行“清除幀”操作
B．在“音樂”圖層的第25幀執行“插入幀”操作
C．在“音樂”圖層的第25幀執行“插入關鍵幀”操作。
D．在“音樂”圖層的第25幀執行“轉換為空白關鍵幀”操作
E。將“音樂”圖層第1幀的聲音同步方式由“數據流”改為“事件”
（注；全部選對得2分，選對但不全得1分，選錯得0分）
(5)測試影片時，單擊“Load” 場景中“播放”按鈕，影片跳轉到“main” 場景的第1幀并開始播放，同時實現在瀏覽器中顯示位于同名文件夾下“病毒介紹。 html”文件的內容，則“播放”按鈕上添加的動作腳本為： on （release） { }。
15.編寫一個VB程序，實現如下功能：輸入s位數字構成的數字字符串（第1位數字不為0），移除k （0算法分析：要使得到的5位數字最小，首先需保證能取到5個數字，且首位應盡量小，那么取首位數的范圍應保證余下有4個數字，即在前4位中選最小非0的數字。
程序運行時，在文本框Text1中輸入一個數字字符串，在文本框Text2中輸入要移除的數字個數，單擊“運行”按鈕CmdRun后，在標簽Labell顯示得到的最小新數，程序運行界面如圖b所示。
(1)程序運行時，若要在名為Form1的窗體標題上顯示“刪數”，可以在Form Load事件處理過程中添加語句為 （單選，填字母：
A． Form1. Text =“刪數”\
B． Form1. Caption =“刪數”\
C． Form1. AddItem“刪數”）
(2)實現上述功能的VB程序代碼如下，請在劃線處填入合適的代碼。Private Sub CmdRun_ Click（）
Dim Num As String，New_num As String ' Num為輸入的數字字符串
Dim i As Integer， j As Integer， m As Integer，
Dim As Integer， s As Integer， k As Integer
Dim a（30） As String， b（30） As Integer
Num = Text1. Text： s = Len（Num）
k = Val （Text2. Text） ’k為刪除數字個數
For i=1 To s
a（i） = Mid（Num，i，1）
Next
j =1
m=1
n= ①
For i=m+l To n ’取第一個非零最小數字
If a（i）>a（m） Then m=I ’加框處程序代碼有誤，請改正
Next i
b（j）= m
Do While ② '取其他最小數字
m=m+1
n=n+1
For i=m+1 To n
If a（i） < a（m） Then m= i
Next i
j =j+1：b（j)=m
Loop
For i= m+1 To s '最后直接取的數字
j =j+1：b（j)=i
Next i
For j=1 To s- k ’輸出最小數
New_ num = ③
Next j
Labell． Caption = New_num
End Sub
(3)加框處程序代碼有誤，請改正。
16.病毒疫苗抗體檢測。使用字符串序列表示志愿者注射疫苗后細胞的DNA和疫苗抗體的DNA（志愿者的DNA序列長度大于疫苗抗體的DNA序列長度），通過檢測疫苗抗體DNA序列是否在志愿者的DNA序列中出現來分析疫苗效果。其中疫苗抗體的DNA序列是環狀的，志愿者的DNA序列是線性的。只要疫苗抗體的DNA序列在志愿者的DNA序列中出現，說明己產生抗體。例如：疫苗抗體的DNA序列是環狀的“cced”，即可以表示為“cced”，也可以表示為“cedc”、“edcc”、“dcce”。A志愿者的DNA序列為“mtrcnmdaced”， 沒有出現抗體序列，結果為“陰性”，B志愿者的DNA序列為“acedssdfaef"，出現抗體序列，結果為“陽性”，C志愿者的DNA序列為“ce”，志愿者的DNA序列長度不夠，無法比對，結果為“無效”。
按上述要求，編寫一個VB程序，功能如下：程序運行時從數據庫中讀取志愿者的檢測號、
DNA序列存入相應數組，在文本框Text1中輸入抗體DNA序列，單擊“檢測結果”按鈕Command11，在列表框List1中按檢測號順序顯示每個志愿者的檢測結果，并在標簽Label1顯示疫苗抗體的陽性率（以百分比表示，并保留2位小數），程序運行界面如圖所示，請在劃線處填入合適的代碼。
Dim Pnum（1 To 100） As String ’Pnum數組存儲志愿者的檢測編號
Dim Pch（1 To 100） As String ’Pch數組存儲志愿者的DNA序列
Dim Prs（1 To 100） As String 'Prs數組存儲志愿者的檢測結果
Dim n As Integer ’存儲志愿者的總人數
Private Sub Form_ Load （）
Dim i As Integer， j As Integer
Dim tmp As String， chtmp As String
Dim Conn As New ADODB．Connection
Dim Rs As New ADODB．Recordset
Conn．ConnectionString = "Provider=Mi crosoft。 ACE．OLEDB．12. 0；Data Source=" + App．Path+"\DNADB．accdb"
Conn．Open
Set Rs．ActiveConnection = Conn
Rs．Open "SELECT * FROM Source"'從數據庫的名為 “Source”數據表中讀取數據
i =0
Do While Not Rs． EOF
i=i+1
Pnum（i） = Rs．Fields（0）
Pch（i） = Rs．Fields(1)
Rs．MoveNext
Loop
Rs．Close
Conn．Close
n= ①
For i=1 To n-1 ’以檢測號作為關鍵字對DNA序列數據進行升序排列
j=i+1
Do While j <= n
If ② Then
chtmp = Pch（i）：Pch（i）= Pch（j）：Pch（j）= chtmp
tmp = Pnum（i）：Pnum（i）= Pnum（j）：Pnum（j）= tmp
End If
j=j+1
Loop
Next i
End Sub
Private Sub Command1_ Click （）
Dim Ach As String，RVch As String，Vch As String
Dim i As Integer，j As Integer，k As Integer，m As Integer
Ach = Text1. Text： s = Len（Ach）： RVch = Ach + Ach
k=0：m=0
For i=1 To n
If Len（Pch（i）） <= Len （Ach） Then
k =k+ 1： Prs（i） = "無效”
Else
For j=1 To s ’按環狀序列依次進行比較
Vch = ③
If Test（Vch，Pch（i）） Then
m=m+1
Prs（i） =”陽性”： Exit For
Else
Prs（i） = "陰性"
End If
Next j
End If
Next i
For i =1To n
List1. AddItem Pnum（i） +" " + Prs（i）
Next i
Label1. Caption = Str（Int（m/（n-k）*10000 +0.5）/100） + "%"
End Sub
Function Test（str1 As String，str2 As String） As Boolean ’字符串比對函數
Dim i As Integer
Test = False
For i = 1 To Len（str2） - Len（str1） + 1
If ④ Then
Test = True： Exit For
End If
Next i
End Function
嘉興市2019~2020學年度第二學期期末檢測
技術 參考答案及評分標準
第一部分 信息技術（共50分）
一、選擇題（本大題共12小題，每小題2分，共24分。在每小題給出的四個選項中，只有一個是符合題目要求的，不選，多選，錯選均不得分）
1
2
3
4
5
6
7
8
9
10
11
12
B
D
C
B
C
A
D
B
D
C
A
C
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
13.(1)=H10/SUM（H$10，H$11，H$17）*100 1分
=H10/（H$10 + H$11 + H$17）*100
(2)B12：H16 1分
(3)BCE 2分
（注：全部選對的得2分，選對但不全的得1分，不選或者有選錯的得0分）
14. (1)CDE 2分
（注：全部選對得2分，選對但不全得1分，選錯得0分）
(2)動畫補間 1分
(3)“按鈕”圖層最后1幀為空白關鍵幀，沒有“按鈕”對象 1分
(4)ACD 2分
（注：全部選對得2分，選對但不全得1分，選錯得0分）
(5)gotoAndPlay（“main”，1）； getURL（“病毒介紹。html”）；
（注：2條命令全部選對得2分，答對1條命令給1分） 2分
15. (1)B 1分
(2)① k + 1 或其他可行答案 1分
② j < k 或 j <> k 或 m < n 或 m <> n 或其他可行答案 2分
③ New_num + a（b（j）） 或其他可行答案 1分
(3) a（i） < a（m） And a（i） <> "0" 或其他可行答案 2分
16. ① i 1分
② Pnum（i） > Pnum（j）
或 Pnum（j） < Pnum（i） 或其他可行答案 2分
③ Mid（RVch， j， s）
或 Mid（Ach + Ach， j， s）
或 Mid（Ach & Ach， j， s）
或 Mid（Ach，j，s-j+1） + Mid（Ach，1，j-1） 或其他可行答案 2分
④ str1 = Mid（str2， i， Len（str1）） 或其他可行答案 2分

展開更多......

收起↑