資源簡介

綜合測試卷(一)
　綜合測試卷第13頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.下列有關信息的說法中,正確的是(　　)
　　　　 　　　　　　 　　　　　
A.2018世界杯比賽實況錄像是信息
B.在收信軟件進行設置,限制郵件大小并過濾垃圾郵件這是信息安全的保護方法
C.三維全景技術,可以720度全方位視角的展示場景,讓人有身臨其境的感覺這是人工智能技術
D.長春長生制藥的偽劣疫苗事件,經過各大媒體曝光,迅速為大眾所知,體現了信息的價值性
答案 B
解析 信息是由圖像、文字、語言等表現的意義,比賽實況錄像是信息的載體。三維全景技術是虛擬現實技術。選項D重點表達了某事件經曝光為大眾所知,體現的是信息的共享性。
2.下列有關網絡技術的說法中,不正確的是(　　)
A.在IE瀏覽器中收藏夾收藏的是網頁的URL
B.Windows防火墻可以阻擋計算機木馬入侵系統
C.FTP協議用于瀏覽器與Web服務器之間的信息傳輸,用來解析網頁
D.瀏覽http://www.ourschool.cn/index.html網頁時網頁上的超鏈接信息保存在“index.html”文件中
答案 C
解析 FTP協議主要用于上傳和下載文件,沒有解析網頁的功能,網頁的解析由瀏覽器完成。
3.某Word文檔部分界面如下圖所示,下列說法錯誤的是(　　)
/
A.文中圖片周圍文字的環繞方式為嵌入型
B.圖中有1位用戶添加了批注
C.文檔中存在拼寫和語法錯誤
D.文檔中存在1處修訂
答案 A
解析 文中圖片周圍文字的環繞方式為四周型或緊密型。
4.“雙色球在線”網站可查詢到如下圖所示的信息。
/
以下關于該網站及存儲信息的數據庫的說法正確的是(　　)
A.“雙色球在線”是一種數據庫管理系統
B.“期數”字段在數據庫中一定是自動編號類型
C.“中獎號碼”字段在數據庫中可以設置為文本類型
D.“總銷售額”字段在數據庫中必定是貨幣類型
答案 C
解析 本題考查數據庫相關知識。題中的“雙色球在線”是一個數據庫應用系統;期數字段可能是文本類型或數值型,不一定是自動編號;總銷售額中的數據在數據庫中可以是文本類型存儲。
5.某算法流程圖如圖所示。
/
執行該算法,輸出變量c的結果是(　　)
A.2 B.5 C.8 D.13
答案 C
解析 該流程圖所示的算法是循環結構算法,循環執行4次,算法中各變量的變化過程如下表所示。
項目
c
a
b
i
循環前
1
1
1
第1次
2
1
2
2
第2次
3
2
3
3
第3次
5
3
5
4
第4次
8
5
8
5
6.使用UltraEdit軟件查看字符內碼,部分界面如下圖所示:
/
圖中內碼所對應的字符是(　　)
A.10加9等19 B.10減9等1
C.10+9=19 D.10-9=1
答案 B
解析 本題考查字符內碼。UtralEdit軟件中顯示的內碼為十六進制,按“ASCII內碼小于7F;GB2312內碼每字符兩字節,每個字節內碼都大于7F”的原則將圖中的內碼和字符一一對應。第1、2兩個字節是ASCII字符,如果編碼31對應的字符是“1”,則30對應的字符是“0”,39對應的是“9”,第3、4個字節對應的是一個漢字,由此確定選項B是正確的。
7.使用GoldWave軟件打開音頻文件,界面如下圖所示。
/
如圖所示狀態下,下列說法不正確的是(　　)
A.該音頻是采用MPEGLayer-3壓縮標準進行壓縮的
B.將當前選中的音頻執行剪裁操作后文件的時長為5秒
C.當前狀態下不能直接對前五秒音頻做淡入效果
D.將該文件存儲為雙聲道的Wave格式后文件容量增加到原來的2倍
答案 D
解析 原音頻是單聲道的,如果是wav格式的,存儲為雙聲道后文件容量是原來的2倍。但原音頻格式是mp3,文件容量遠小于wav格式的,所以存儲為雙聲道后文件容量遠不止原來的2倍。
8.使用PhotoShop軟件對“戰狼Ⅱ.psd”進行處理,編輯界面如圖所示,以下描述不正確的是(　　)
/
A.可直接進行濾鏡效果設置的圖層有2個
B.“犯我中華者,雖遠必誅!”圖層中的文字可使用“自由變換”命令改變字體的大小
C.背景中的水印文字“企鵝號騰訊娛樂”可用仿制圖章工具去除
D.可以使用文字工具直接對“戰狼Ⅱ”圖層中的“戰狼Ⅱ”文字進行字體設置
答案 D
解析 可直接設置濾鏡效果的圖層是:背景、戰狼Ⅱ,文字圖層須進行柵格化后才能設置濾鏡。 “戰狼Ⅱ”是圖像圖層,不能用文字工具直接修改其中字體。
9.在Flash中制作白云變幻的效果,動畫第1幀的屬性面板如圖所示。
/
下列說法正確的是(　　)
A.當前幀可以添加動作腳本
B.白云變幻速度逐漸加快
C.聲音“以人民的名義.wav”播放時音量由小到大
D.組合第1幀中的白云,不會影響變幻的效果
答案 A
解析 圖層中有動畫,第1幀必定是關鍵幀,關鍵幀中可以添加動作腳本。緩動值是正數,動畫速度越來越慢。聲音效果是淡出,則音量由大到小。作為形狀補間動畫,關鍵幀中的對象必須是形狀,不能組合。
10.有一段未經壓縮的PAL制式的AVI無聲視頻,每幀畫面為1024*512像素,24位彩色,視頻時間為4秒,將其轉換成MP4后其存儲容量為15 MB,則壓縮比約為(　　)
A.2.5∶1 B.10∶1 C.64∶1 D.80∶1
答案 B
解析 視頻文件容量計算公式為:寬?? 高?? 量化位數?? 幀頻?? 時間/8,其中“幀頻?? 時間”即視頻幀數。PAL制式視頻的幀頻為25FPS,NTSC制式視頻的幀頻為30FPS,壓縮比=未壓縮文件容量/壓縮后文件容量。該AVI文件容量為1024?? 512?? 24?? 25?? 4/8/1024/1024≈150 MB。所以壓縮比是150∶15。
11.有如下VB程序段:
Dim a(1 To 6) As String
dim s As String,n as Integer,i As Integer
s=″54851845236″:n=6
For i=1 To n-1
a(i)=Mid(s,i,i)
Next i
For i=1 To n-2
k=i
For j=i+1 To n-1
If a(k)Next
If k<>i Then
t=a(k):a(k)=a(i):a(i)=t
End If
Next i
Text1.Text=Str(a(1))
該程序段運行后,文本框Text1中顯示的內容是(　　)
A.845236 B.851 C.18452 D.5
答案 B
解析 程序采用選擇排序算法對數組進行降序排序,所以a(1)的值是最大值。需要注意的是數組元素類型是字符串型,排序完成后,a(1)=″851″,a(2)=″845236″,a(3)=″5184″,a(4)=″5″,a(5)=″48″,a(6)=″18452″。
12.有如下VB程序段:
i=1:j=10:flag=True:n=0
Key=Val(Text1.Text)
Do While i<=j And flag=True
m=(i+j)2
If a(m)=Key Then
flag=False
Elseif a(m)>Key Then
i=m+1:n=n-1
Else
j=m-1:n=n+1
End If
Loop
數組元素a(1)到a(10)依次是99,94,90,87,70,69,60,56,45,36,變量n的值最終是0,則文本框Text1輸入的數字可能是(　　)
A.100 B.87 C.69 D.41
答案 C
解析 程序采用對分查找法查找key,如果a(m)>key,n減1,a(m)本題可以用二叉樹的方法解決,如下圖所示,節點中的數字表示元素值,節點在第n層,表示找到該數要n次。圖中左節點表示a(m)>key,n減1,右節點表示a(m)/
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.在2016年夏季高校畢業季,梧桐果在全站大數據分析的基礎上,發布大學畢業生各專業就業難度指數報告。請根據表格數據回答以下問題:
/
(1)標題“2016中國高校畢業生就業難度指數排名(專業小類)”處于區域A1:L1中間,實現方法是　　　　　　　　　　　　　　　　。?
(2)畢業生數占比是根據畢業生數除以總畢業生數得到的,表中K4:K13一列數據由K3單元格公式自動填充而得,由上圖可知,單元格K13中的公式是　　　　　　　　　　　　　　　　。?
(3)現要對“就業難度最小前十專業”數據按“就業難度指數”升序排列,那么排序前應選中的數據區域是　　　　　　　　　　　　　　　　。?
(4)根據上圖數據創建以下的圖表,則創建該圖表的數據區域是　　　　　　　　　　　　　。?
2016中國高校畢業生就業難度最大前十專業
/
答案 (1)選擇A1:L1,執行″合并及居中″命令　(2)=J13/SUM($J$4:$J$13)　(3) G3:L13　(4)B3:D13
解析 (2)向下自動填充時,公式中的地址列標不變,行號增值,向下填充n格,則行號增加n,若是絕對引用型地址則不變。圖中顯示K4單元格內的公式是=J4/SUM($J$4:$J$13),向下填充至K13,公式中地址行號增加9,列標不變,絕對引用地址$J$4:$J$13也不變,因此公式變為=J13/SUM($J$4:$J$13)。
(3)因為“就業難度最大前十專業”相關數據區域A3:E13不能參與排序,所以在選擇排序數據時不能包括在內。
(4)由水平軸可知,B3到B13屬于數據源;由圖例可知,需求崗位數和畢業生數所在兩列(即C3:D13)屬于數據源。
14.“四葉玫瑰數”是指一個四位自然數各位上數字的四次方之和等于該四位數本身的數。如自然數8208=84+24+84,那它就是一個“四葉玫瑰數”。現用VB編寫一個程序,實現如下功能:單擊“查找”按鈕Command1,在列表框List1中顯示所有“四葉玫瑰數”,并在標簽Label2中顯示找到的個數,運行界面如下圖所示:
/
(1)為實現上述功能,請在劃線處填入正確的代碼。
Private Sub Command1_Click()
Dim i As Integer, s As Integer
Dim a As Integer, b As Integer, c As Integer, d As Integer
s = 0
For i = 1000 To 9999
①　　　　　　　'取出個位數字?
　b = (i Mod 100) 10　'取出十位數字
　c = i 100 Mod 10　'取出百位數字
　d = i 1000　'取出千位數字
　If a ^ 4 + b ^ 4 + c ^ 4 + d ^ 4 = i Then
List1.AddItem i
s =②　　　　　?
　End If
Next
Label2.Caption = ″四葉玫瑰數共有″+ Str(s) + ″個″
End Sub
(2)程序中的語句“b = (i Mod 100) 10”和下列哪些項功能相同　　　(多選)。?
A.b=i10 mod 10
B.b=int(i/10) mod 10
C.b = i Mod 10010
D.b=mid(i,3,1)
答案 (1)①a=i Mod 10　②s+1　(2)AB
15.裘老師制作一個主題為“C919客機介紹”的多媒體作品。她首先使用Photoshop軟件制作一張背景圖片,然后使用Flash軟件制作動畫。作品的Flash制作界面和制作腳本分別如圖甲和圖乙所示。請回答下列問題:
/
甲
場景:主界面
類別序號:3
進入方式:由load場景直接進入
呈現方式:
1.“飛機”從舞臺左上方飛到舞臺中央,飛行過程中飛機由小變大。
2.“材料”“座椅”“航電”“機翼”“發動機”5個按鈕均由小變大出現在舞臺中,單擊這些按鈕分別播放“材料”“座椅”“航電”“機翼”“發動機”場景。
3. 單擊“結束”按鈕關閉動畫。
呈現順序說明:
1.一開始出現背景圖片和飛機動畫,1秒后播放背景音樂。
2.飛機動畫結束后依次出現“材料”“座椅”“航電”“機翼”“發動機”5個按鈕的動畫。
3.最后出現“結束”按鈕。
乙
(1)背景圖片“藍天.jpg”太大,為使其大小與Flash文檔大小一致,需要對背景圖片大小進行調整,若不考慮圖像被裁剪掉或比例問題,在Photoshop中哪些工具可對圖像文件尺寸進行調整　　　　　　　　　　　(多選:A.圖像大小命令/B.裁剪工具/C.自由變換/D.畫布大小命令/E.縮放工具)?
(2)直接使用導入的飛機位圖在C919圖層中制作動畫,該動畫類型為　　　　　　　　　(填:動畫補間/形狀補間/逐幀動畫)。?
(3)測試影片時,發現聲音出現的時間不符合制作腳本要求,應做的調整是　　　　　　　　　　　　　　　　　　　　　　　　。?
(4)根據制作腳本要求,有一個動畫出現時間不符合要求,應做的調整是　。?
(5)根據制作腳本,給結束按鈕添加合適的動作腳本　。?
答案 (1)ABD　(2)動畫補間　(3)在背景圖層11幀插入關鍵幀,并在關鍵幀中添加音樂,刪除背景圖層第1幀中的音樂　(4)把發動機圖層第26幀到30幀移到31至35幀。　(5)on(press){fscommand(″quit″);}或on(release){fscommand(″quit″);}
解析 (1)自由變換和縮放工具不會改變文件尺寸。
(2)位圖實例適用做動畫補間。
(5)按鈕中的動作腳本須以on函數開頭。
16.小李統計2017年各國在浙江省旅游人數,設計了一個程序。程序運行時在列表框List1中輸出已經按照大洲類別分類的信息,在文本框Text1中輸入“大洲類別”,如:歐洲,單擊“查找排序”按鈕Command1,將在列表框List2中輸出該“大洲類別”旅游人數從低到高的信息。程序運行界面如圖所示:
/
實現上述功能的VB代碼如下,但加框處代碼有錯,請改正。
Dim k As Integer　'k變量用來存放國家的個數
Private Sub Form_Load()
'從數據庫中讀取數據并存儲在相關變量中。aa()數組用來存放國家名稱,bb()數組用來存放大洲類別,cc()數組用來存放旅游人數。
'代碼略
End Sub
Private Sub Command2_Click()
Dimzb(1 To 10) As String　　'用來存放大洲類別
Dimwz(1 To 10) As Integer '用來存放每類大洲開始的位置
Dimcd(1 To 10) As Integer '用來存放每類大洲的國家個數
Dim c As String,pos As Integer,ld As Integer
zb(1)=bb(1):wz(1)=1:cd(1)=1
n=1:c=Text1.Text
For i=2 To k
　If bb(i)=zb(1) Then　　　　　'①
cd(n)=cd(n)+1
　Else
n=n+1
zb(n)=bb(i):cd(n)=1:wz(n)=i
　End　If
Next i
For i=1 To n
If zb(i)=c Then pos=wz(i):ld=cd(i)
Next i
For i=pos To ld '②
　For j=pos+ld-1 To i+1 Step-1
If cc(j)t=aa(j-1):aa(j-1)=aa(j):aa(j)=t
t=cc(j-1):cc(j-1)=cc(j):cc(j)=t
End If
　Next j
Next i
For i=pos To pos+ld-1
List2.AddItem aa(i)+″ ″+bb(i)+″ ″+Str(cc(i))
Next i
End Sub
答案 ①bb(i)=bb(i-1)或bb(i)=zb(n)　②pos To pos+ld-2
解析 ①所在循環統計各洲國家數cd(n)和開始下標wz(n)。統計方法為如果當前國家所屬洲與之前洲相同時,與上面為同一洲,則國家數量cd(n)加1,所以①處填bb(i)=bb(i-1),之前國家所屬洲存放在zb(n)中,所以①處也可以填bb(i)=zb(n)。②處所在雙重循環對某洲進行排序,該洲所在的下標范圍是pos到pos+ld-1,由內循環j的范圍和交換數據可知,排序采用的是上浮式冒泡算法,所以②處填pos To pos+ld-2。
17.木材廠有一些原木,現在想把這些木頭切割成一些長度相同的小段木頭(木頭有可能有剩余),需要得到的小段的數目是給定的。當然,希望得到的小段越長越好。現在用VB編寫程序計算能夠得到的小段木頭的最大長度(木頭長度的單位是cm,原木的長度都是正整數,要求切割得到的小段木頭的長度也是正整數)。功能如下:
文本框Text1里依次輸入每一根原木的長度,文本框Text2里輸入需要得到的小段的數目xds。單擊計算按鈕Command1,文本框Text3中顯示能夠切割得到的小段的最大長度。如果連1cm長的小段都切不出來,則輸出“0”。運行效果如圖所示。
/
實現上述功能的VB程序如下,請在劃線處填入合適代碼。
Dim a(1 To 1000) As Integer
Dim i As Integer, num As Integer
Function ok(zccd As Integer, yms As Integer, xds As Integer) As Boolean
num = 0
For i = 1 To yms
num = num + a(i) zccd　'yms根原木切割成長度為zccd的木頭的段數
　If num >= xds Then Exit For
　Next i
　　 If①　　　　　 Then?
　　 ok = True
　　 Else
　　 ok = False
　End If
End Function
Private Sub Command1_Click()
Dim left1 As Integer, right1 As Integer, mid1 As Integer
Dim yms As Integer, xds As Integer
　 xds = Val(Text2.Text)
　 s = Text3.Text
　 num = ″ ″: yms = 0: right1 = 0
　 For i = 1 To Len(s)
　 　ch = Mid(s, i, 1)
　 　If ch >= ″0″ And ch <= ″9″ Then num = num + ch
　 　If ch < ″0″ Or ch > ″9″ Or i = Len(s) Then
　 　　yms = yms + 1: a(yms) = Val(num): num = ″ ″
　 　　If a(yms) > right1 Then right1 = a(yms)
　 　End If
　 Next i
　right1 = right1
　left1 = 1
　Do While left1 + 1 < right1
mid1 =②　　　　?
If Not ok(mid1, yms, xds) Then
　right1 = mid1
Else
　left1 = mid1
End If
　Loop
　Text4.Text =③　　　　?
End Sub
答案 ①num >= xds　②(left1+right1)2　③str(left1)
解析 自定義函數ok的功能是判斷yms根原木切割成長度為zccd的木頭的段數num是否達到目標數xds,如果num>=xds,則返回true,否則返回false。主程序中變量right1表示最長原木。②處所在的循環程序采用對分查找法計算小段的最長長度值,所以②處是取中間長度,填(left1+right1)2。最終小段最長長度保存在變量left1中。
綜合測試卷(七)
　綜合測試卷第37頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.下列關于信息和信息技術的說法,正確的是(　　)
　　　　 　　　　　　 　　　　　
A.新信息一定比舊信息更具價值
B.計算機對各類信息進行加工處理,本質上都是通過計算完成的
C.通過無線網絡傳輸的信息不依附于任何載體
D.由于電子計算機是現代才出現的,因此古代沒有信息技術
答案 B
解析 信息的價值體現在對于使用者的價值,同一信息對于不同的人可能具有不同的價值。無線網絡也是信息傳輸的載體。信息技術自古就有,只是技術有落后與先進。
2.關于搜索引擎和網頁,下列說法正確的是(　　)
A.搜索引擎搜索信息時,可通過增加關鍵字來減少搜索到的信息數
B.用搜索引擎搜索信息,本質上是檢索各網站的數據庫
C.網頁是由HTTP語言編寫的純文本文件,可以由記事本軟件編輯
D.選擇“網頁,僅HTML”方式保存網頁,保存的文件不含表格
答案 A
解析 用搜索引擎搜索信息,本質上是檢索搜索引擎網站的索引數據庫。網頁是由HTML語言編寫的純文本文件。選擇“網頁,僅HTML”方式保存網頁,保存的文件包含表格、超鏈接。
3.下列關于漢字識別的說法錯誤的是(　　)
A.漢字識別過程中應用了人工智能
B.使用OCR得到的識別結果可能有錯別字,可使用Word的“自動更正”功能自動更正
C.掃描圖像時提高掃描的分辨率,可適當提高字符的識別率
D.印刷文字的識別正確率高于手寫體文字
答案 B
解析 使用OCR得到的識別結果有錯別字,需要人工校對,Word中的自動更正功能只在輸入時起作用。
4.實現計算器上xy運算處理的算法部分流程圖如題圖所示:
/
下列說法正確的是(　　)
A.框圖①中該填入的是f←x*j
B.框圖①中該填入的是f←f*j
C.j←j+1被執行了x次
D.j←j+1被執行了y次
答案 D
解析 框圖①中該填入的是f←f?? x。
5.某Access數據表編輯界面如下圖所示。
/
以下說法正確的是(　　)
A.該數據表的名稱為“唱片”,共有6條記錄
B.該數據表有6個字段
C.在數據表視圖中,不能在已有記錄之前插入新的記錄
D.“ID”字段的值可以有重復
答案 C
解析 當前數據表共有5條記錄,最后一行是空的,不是記錄。該數據表有5個字段,最后一列“單擊以添加”不是字段。ID字段數據類型為“自動編號”,字段值不能有重復。
6.某十進制偶數x,范圍為100-254,將其轉化為二進制數y,以下說法不正確的是(　　)
A.x/2的運算結果轉為二進制一定比y少1位
B.二進制數y的最低位一定是0
C.十進制數x+1轉化為二進制數不超過8位
D.十進制數x mod 16與二進制數y的左側4位的值相等
答案 D
解析 十進制數x mod 16與二進制數y的右側4位的值相等。
7.小貝把計算機“顯示屬性”的顏色模式由24位色改成32位色,但圖像色彩的顯示效果看不出什么明顯的變化,這主要體現了數據冗余的(　　)
A.空間冗余 B.視覺冗余 C.結構冗余 D.時間冗余
答案 B
解析 人眼對顏色的辨別能力是有限的,提高顏色的量化位數對人的觀感沒多大區別,而只會產生視覺冗余。
8.小明使用PhotoShop軟件制作“中國畬鄉三月三.psd”作品,部分界面如下圖所示。
/
下列說法不正確的是(　　)
A.圖像模式為“RGB顏色”模式
B.當前狀態下“背景”圖層可以設置不透明度
C.“中國畬鄉三月三”圖層可用文字工具/修改文字字體
D.“鳳妮”圖層設置了“投影”和”外發光”兩種圖層樣式效果
答案 B
解析 背景是鎖定的,不透明度、混合模式、圖層樣式等均不能設置。
9.下圖是制作某Flash作品的截圖,從圖中可知,“背景”圖層中的背景圖片僅在第1幀到第20幀出現,若要使背景圖片一直延續到第45幀,可在該圖層的第21幀上進行的操作是(　　)
/
A.清除關鍵幀 B.刪除幀
C.清除幀 D.剪切幀
答案 A
解析 清除關鍵幀后,21幀成為普通幀,其中圖像將延續前一關鍵幀(第1幀)中的內容。
10.將一張1024×768像素,24位真彩色圖像“1.bmp”文件,存儲為256色圖像“2.bmp”文件,圖像尺寸不變,則兩個文件存儲容量之比約為(　　)
A.3∶1 B.2∶3
C.3∶32 D.1∶1
答案 A
解析 256色圖像的量化位數8位,容量比=1024?? 768?? 24∶1024?? 768?? 8=3∶1。
11.數組元素a(1)到a(5)的值依次為“15”、“21”、“43”、“24”、“5”,利用如下程序段對其進行加工處理。
Dim a(1 To 5) As String
i=5:Text1.Text=″ ″
Do While i>1
k=i
For j=1 To i-1
If a(k)Next j
t=a(k):a(k)=a(j):a(j)=t
Text1.Text=a(i)
i=i-1
Loop
該程序段執行后文本框Text1中顯示的內容是(　　)
A.5 B.15 C.21 D.43
答案 C
解析 程序采用選擇排序算法對數據進行升序排列。第1遍,i=5,在1至5號中找到最大值下標k,將a(k)與a(j)進行交換,此時j=i,所以就是把最大值a(k)交換到a(i)中。最后一遍,i=2,在1至2號中找到最大值下標k,將a(k)與a(i)進行交換,就是把5個數中第4大的數存入a(2)中,并把a(2)顯示在Text1中。由于數據是字符串,所以5個數中第4大的數是“21”。
12.某對分查找算法的VB程序段如下:
n = 0
i = 1:j = 6
Key = Val(Text1.Text)
f = False
Do While i < = j And Not f
m =Fix((i + j +1)/2)
n = n + 1
If Key = d(m) Then
f = True
ElseIf Key > d(m) Then
j = m - 1
Else
i = m + 1
End If
Loop
數組元素d(1)到d(6)的值依次為“77,52,43,31,21,15”,若該程序段運行結果后,n的值為2,則key的值是(　　)
　　　　　　　　　　　　　　
A.77 或 21 B.52 或 15 C.52 或 21 D.43 或 15
答案 B
解析 對分查找一次,n的值加1,n的值為2,表明查找了2次找到key。第1次中間值為3號元素43,key可能比43小,也可能比43大,所以第2次找到的可能是15或52。
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.小王收集了部分國家人文發展指數數據,并使用 Excel 軟件進行數據處理,如圖甲所示。請回答下列問題:
/
甲
(1)區域 C13:F13 中的數據是從 B13 單元格利用自動填充功能得到的,則 F13 單元格中的公式是　　　　　　　　　　　　　　　　。?
(2)如圖甲所示,數據區域 A2:F12 已進行了排序,則排序的主要關鍵字是　　　　　　。?
(3)根據圖甲中數據,制作了一張反映各國出生時預期壽命指數的圖表,如圖乙所示。但該圖表橫軸顯示序號而沒有顯示預期的國家名稱,改正的方法是?
　。?
出生時預期壽命指數
/
乙
(4)若將圖甲中 B3:F12 區域的數據設置為數值格式、1 位小數,則圖乙所示圖表中的柱形將　　　(選填:不變/升高/降低 )。?
答案 (1)=AVERAGE(F3:F12)　 (2)人文發展指數　(3)給圖表添加數據區域A2:A12或重新設置圖表的數據區域為A2:A13,F2:F12　(4)不變
解析 (1)由題圖可知,B13中的公式是=AVERAGE(B3:B12),自動填充到F13,則其中的公式是=AVERAGE(F3:F12)。(2)觀察圖a工作表可知,只有人文發展指數是有序的,所以記錄是按人文發展指數關鍵字排序的。(3)略。(4)設置數值格式,不改變數據實際大小,所以不會影響圖表。
14.山頂上共有10個洞,一只兔子和一只狐貍相遇了,狐貍要吃兔子。兔子對狐貍說:“你可以吃掉我,但必須先找到我。我就藏在這10個洞的其中一個洞中(10個洞的編號分別為:1、2、3、……10)。你先到1號洞找我,若沒找到,則第二次隔一個洞找我,即3號洞;第三次隔兩個洞找我,即6號洞;以后以此類推,找到就可以吃掉我。狐貍答應了,但是狐貍進進出出100次后,也沒找到兔子,請問兔子躲藏在哪個洞?
解決此問題的VB程序界面如圖所示,單擊“尋找”按鈕,在列表框List1中顯示兔子可能躲藏的山洞編號。
/
(1)模擬上述過程的VB程序代碼如下,請在劃線處填入正確的語句。
Private Sub search_Click()
Dim i As Integer,k As Integer,hole As String
hole=　①　?
k=0
For i=1 To 100
k=　②　?
If k=0 Then k=10
hole=Mid(hole,1,k-1)+″0″+Mid(hole,k+1,Len(hole)-k)
Next i
For i=1 To 10
If 　③　 Then List1.AddItem Str(i)?
Next i
End Sub
(2)結合程序設計界面和代碼,可知“尋找”按鈕的對象名為　　　　。?
答案 (1)①″1111111111″　②(k+i) Mod 10　③Mid(hole,i,1)=″1″
(2)search
解析 (1)程序中變量hole記錄k號洞狀態,初值為10個1組成的字符串,表示未有狐貍光顧過。變量k的功能是記錄進洞的編號。②處循環記錄狐貍100次入洞的編號k,并把k號位置的數字改為0。③處循環顯示未有狐貍光顧的洞編號,如果i號洞穴未光顧的,則字符串第i位數字為1,所以③處填Mid(hole,i,1)=″1″。
(2)從事件處理過程名search_Click中可以看出“尋找”按鈕的對象名為search。
15.小明制作了一個主題為“2018世界杯”的Flash作品,其中“main”場景的制作腳本如下所示。請回答以下問題。
場景名:main
進入方式:由“load”場景單擊“Enter”按鈕進入
呈現方式:
1.足球從舞臺外右上側進入舞臺,最終停在舞臺下方中央。
2.“按鈕”圖層的按鈕出現在舞臺左下方,單擊該按鈕,動畫從本場景第1幀開始播放。
呈現順序:
1.一開始出現草地背景,“音樂”響起。
2.動畫開始1秒后,足球從場外右上側飛入,補間動畫持續2秒后,靜止在舞臺下方中央。
3.動畫開始1.5秒后,文字由小變大,旋轉一圈進入舞臺上方,持續2秒后靜止在舞臺上。
4.最后出現“replay”按鈕,動畫停止播放。
/
圖a
(1)用PhotoShop打開足球圖片“ball.jpg”,如圖a所示。要去除白色背景,使其導入Flash后背景透明,以下操作可行的是:　　　　。(單選:A.用魔棒選中白色背景,刪除后存為gif格式/B.用橡皮擦工具擦除白色,將文件存為png格式/C.用魔術橡皮擦工具點選白色區域,并將文件存為gif格式)?
結合制作腳本及圖b,請回答以下問題:
/
圖b
/
圖c
(2)足球在第11幀時的坐標位置可能為　　　　。?
/
(3)文字實例由小到大,旋轉一圈進入舞臺上方,可知文字動畫是　　　　(A.動畫補間　B.形狀補間)。?
(4)文字的出現與腳本設計不符,修改方法為　　　　　　　　　　　　　　　。?
(5)音樂圖層第1幀設置如圖c,在不影響其他動畫播放效果的前提下,要使音樂播放到第40幀時停止,以下可行的操作有:　　　　。(多選:A.在“音樂”圖層第40幀插入空白關鍵幀/B.刪除“音樂”圖層第40幀至60幀/C.選中“音樂”圖層第40幀,添加動作命令stopAllSounds();/D.在“音樂”圖層第40幀插入關鍵幀,并添加動作命令stop();)?
(6)結合制作腳本可知,“replay”按鈕上的動作命令為　　　　　　　　　　　。?
答案 (1)C　(2)D　(3)A　(4)將“文字”圖層第1幀移動到第16幀(正負1幀均可)　(5)AB　(6)on(press/release){gotoandplay(1);}
解析 (1)用選項A或B的方法得到的圖像還是有背景色,不會是透明的。
(2)根據制作腳本可知,足球運動方式是從舞臺外右上側移到舞臺下方中央,11幀是動畫開始幀,足球應在舞臺外右上側,所以x>0,y<0。
(3)動畫對象是文字實例,則動畫類型必定是動畫補間。
(4)根據動作腳本的要求,文字在1.5秒后出現,因此文字動畫應在16幀開始,持續2秒,即在36幀結束。所以要把文字圖層第1幀移到16幀。
(5)動作不能加載到普通幀中,按選項C的做法,動作實際會被加入第1幀。正確的做法應先在音樂圖層第40幀處插入關鍵幀,再添加動作。或者在文字或者足球圖層40幀直接添加動作。
(6)略
16.尼克斯徹定理:任何一個大于等于 1 的整數的立方等于一串連續奇數之和,如:13=1,23=3+5,33=7+9+11。編寫一個 VB 程序驗證尼克斯徹定理,程序運行時,在文本框 Text1 中輸入一個大于等于 1 的整數,單擊“驗證”按鈕 Command1,在文本框 Text2中顯示驗證結果,運行界面如圖所示。
/
實現上述功能的 VB 代碼如下,其中加框處代碼有錯,請改正。
Dim n As Integer, i As Integer, t As Integer, sum As Long, s As String
n = Val(Text1.Text)
For i = 1 To n ^ 3 Step 2　　 '變量 i 表示連續奇數的首個整數
　sum = 0: t = i: flag = False
　Do While sum <= n^3 And flag = False
sum = sum + t
t = t + 1　'①
If sum = n ^ 3 Then flag = True
　Loop
　If flag = True Then Exit For
Next i
s = Str(n) + ″^3=″
Do While sum > 0
sum = sum – 1　'②
If sum = 0 Then
　s = s + Str(i)
Else
　s = s + Str(i) + ″+″
End If
i = i + 2
Loop
Text2.Text = s
End Sub
答案 ①t=t+2　②sum=sum-i
解析 ①處所在的雙重循環通過枚舉算法找出連續奇數的首個整數i,使得i+(i+2)+(i+4)+…等于n3,所以①處填t=t+2。②處所在循環生成驗證結果文本,驗證結果文本的第1個數字是i,每循環一次,i的值存入s,并把sum的值減去i,直到sum=0結束循環。所以②處填sum=sum-i。
17.最大回文子串。回文字符串是具有回文特性的字符串:即該字符串從左向右讀,與從右向左讀都一樣.如:鳳落梧桐梧落鳳,abcba等。“最大回文子串”是指一個字符串中長度最大的回文字符串,其基本算法思想如下:
a.每個回文都有一個“中心”,當回文字符數為奇數時,中間的那個字符就是回文中心;但是當回文的字符數為偶數時,回文的中心是最中間的那兩個字符,且這兩個字符相同。
b.對任意一個字符或者相同的兩個連續字符,我們都可以假設它為回文的“中心”,向它的左右兩邊擴展出盡可能長的回文。對于每種假設,我們都能得到一個回文,而最長回文必定由其中的某個假設中得到。
現編寫一個VB程序,在Text1中輸入一串字符,單擊“統計”按鈕,在Text2中顯示該字符串中的最大的回文子串(長度相同時,輸出最左邊的子串)。運行界面如圖所示。
/
請回答下列問題:
(1)當Text1中輸入“123321344332423112113123”時,則輸出的結果為　　　　　。?
(2)請在劃線處填入合適的代碼。
Dim n As Integer
Dim a(0 To 100) As String
Private Sub Command1_Click()
Dim s As String
Dim left As Integer,right As Integer,i As Integer
Dim max As Integer,m As Integer,b1 As Integer
'變量b1用于記錄回文子串的左端起點
Text2.Text=″ ″
s=Text1.Text
n=Len(s)
For i=1 To n
a(i)=Mid(s,i,1)
Next i
max=0:left=0:right=0
For i=1 To n
left=i
right=i
m=longest(left,right)
If m>max Then
　　　①　?
　　max=m
End If
left=i
right=i+1
If a(left)=a(right) Then
　　m=longest(left,right)+1
　　If m>max Then
　　　　b1=i-m2+1
　　　　max=m
　　End If
End If
Next i
For i=b1 To 　②　?
Text2.Text=Text2.Text+a(i)
Next i
End Sub
Function longest(left As Integer,right As Integer) As Integer
Dim p As Integer
p=1
Do While left>1 And rightleft=left-1
right=right+1
p=p+2
Loop
longest=p
End Function
答案 (1)3112113　(2)①b1=i-m2　②b1+max-1　③a(left-1)=a(right+1)
解析 (1)略　(2)程序中變量b1存儲回文字符串的開始位置,m存放回文字符串的長度,max存放最長回文字符串的長度。①處是對回文字符數為奇數時的處理,此時回文中心位置是i,所以①處應填b1=i-m2。②處通過循環顯示回文字符串,回文字符串始于b1,終于b1+max-1,所以②處填b1+max-1。③自定義函數longest檢測以left和right為中心的回文字符串的長度,如果a(left)=a(right),表示兩側字符相同,回文長度p加2。但是在主程序中,已經對a(left)=a(right)進行過判斷,并且當回文的中心是最中間的那兩個字符時,主程序調用方式是m=longest(left,right)+1,結合自定義函數中初始回文長度p=1,所以進入函數進行檢測時,直接對下一對字符進行檢測,所以③處的條件應該是a(left-1)=a(right+1)。
綜合測試卷(三)
　綜合測試卷第21頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.某日收到如圖所示的微信官方短信,收到此條短信后正確的做法是(　　)
/
　　　　 　　　　　　 　　　　　
A.馬上登錄微信,一直保持登錄狀態,防止他人登錄成功
B.馬上修改微信密碼,提高安全等級
C.馬上將手機關機
D.微信安全技術可靠,無須任何操作
答案 B
解析 收到該信息,表明微信密碼可能泄露,需要馬上修改微信密碼。
2.下列網絡相關術語的說法,錯誤的一項是(　　)
A.HTML:超文本標記語言,是靜態網頁的表達規范
B.SMTP:簡單郵件傳輸協議,主要用于發送郵件到收件人的郵箱服務器
C.HTTP:超級文本傳輸協議,主要用于網頁的傳輸解釋執行
D.URL:統一資源定位器,即通常所謂的“網址”
答案 C
解析 超級文本傳輸協議的功能是傳輸URL和網頁信息。
3.下列應用中,體現了人工智能技術的有(　　)
①裝有傳感器的“智能小車”,自動沿著黑線路徑行駛
②郵件服務器自動識別垃圾郵件,實現郵件分類
③數碼相機的人臉檢測功能
④Excel自動填充功能
⑤使用OCR軟件從圖像中識別漢字
A.①②⑤ B.②④⑤ C.②③⑤ D.③④⑤
答案 C
解析 “智能小車”運用的是傳感器技術。郵件服務器自動識別垃圾郵件,使用的是人工智能中的學習和模式匹配功能。人工智能技術包括識別技術(如OCR、語音識別、人臉識別,指紋識別等)、人機對弈、機器翻譯等。
4.使用 Access 軟件創建的“student”數據表,部分界面如圖所示,
/
下列說法正確的是(　　)
A.該數據表名稱是“student”,共有 6 條記錄
B.“ID”字段的值一定是不相同的且不能為空值
C.“身份證”字段的類型也可設置成“數字”型
D.在數據表視圖下,可在“班級”字段輸入“1 班”
答案 B
解析 圖示為student表的設計視圖,表格中展示的是其字段名、數據類型,不是記錄。“ID”字段是自動編號類型,其值一定是不相同的且不能為空值。“身份證”中可能有字母x,其字段的類型不可設置成“數字”型。“班級”字段數據類型是數字,不能輸入文本“1 班”。
5.某算法流程圖如下圖所示:
/
執行該算法,輸出變量a的結果是(　　)
A.1 B.5 C.20 D.120
答案 B
解析 這是一個循環結構的算法,循環條件是a≤i,經過一次循環后,a=5,i=4,所以循環只執行一次便輸出結果a。
6.用UltraEdit軟件觀察“加油!Boy”這幾個字的內碼如下圖所示:
/
則下列說法不正確的是(　　)
A.“!”內碼為21 20
B.這些字符所占的存儲空間為9B
C.“z”字符內碼對應的二進制值為1111010
D.“Y”的內碼為99
答案 A
解析 “!”內碼為21。內碼小于80H,說明是ASCII碼,只須用1個字節表示。20H表示空格,9個字節占9B。
7.某動畫“片頭”場景的文字腳本如表所示。
幀號
畫面
尺寸
播放
時間
媒體素材
1
640×480
15秒
標語;背景音樂;背景圖;滅火動畫;標題動畫
工具軟件
Photoshop,ACDSee,Cool3D,Flash,GoldWave,會聲會影
輔助設備
掃描儀,數碼攝像機
/
片頭動畫由“隱患險于明火,防范勝于救災,責任重于泰山”文字及滅火器圖片組成,動畫過后呈現標題及背景音樂
方式
名稱
鏈接
/
單擊
“進入”
按鍵
無
限時
無
下列說法不正確的是(　　)
A.媒體元素分解將進一步細化“媒體素材”中所列出的媒體元素
B.數碼攝像機和會聲會影用于采集和制作視頻素材
C.在“片頭”場景單擊“進入”按鈕將跳轉到主交互界面
D.文字腳本可作為多媒體作品制作的直接依據
答案 D
解析 多媒體作品制作的直接依據是制作腳本。
8.使用 GoldWave 軟件打開某音頻文件,其編輯界面如圖所示,
/
下列說法不正確的是(　　)
A.該音頻的采樣頻率為 44.1KHz,比特率為 1411kbps
B.如果插入 10 秒“靜音”,以當前參數保存,音頻文件容量將增加
1
6
C.當前狀態下執行“剪裁”操作,以當前參數保存,文件存儲容量約為 10MB
D.“全選”左聲道,單擊“刪除”后文件存儲容量變為原來的
1
2
答案 D
解析 “全選”左聲道,單擊“刪除”后,左聲道還是存在,時間長度不變,其他參數不變,文件存儲容量不變。
9.下圖為某Flash動畫的時間軸截圖,
/
若想從第5幀開始不出現小船,則下列操作不可行的是(　　)
A.在“小船”圖層第 5幀執行“清除幀”操作
B.在“小船”圖層第 5幀執行“插入空白關鍵幀”操作
C.在“小船”圖層第 5幀執行“轉為空白關鍵幀”操作
D.選中“小船”圖層第 5 幀到 20 幀執行“刪除幀”操作
答案 A
解析 在“小船”圖層第 5幀執行“清除幀”操作后,第 5幀變為空白關鍵幀,第6幀成為關鍵幀,第6幀開始到結束小船還是一直存在。
10.等式“(10)x-(10)y=(110)z”成立,算式中下標x,y,z表示數字的制式,則x,y,z的值分別是(　　)
A.16、10、2 B.10、16、2
C.16、2、2 D.10、2、2
答案 A
解析 可通過代入法得出答案。
11.運行下列VB程序,在文本框Text1、Text2、Text3中分別輸入3、6、8后,單擊命令按鈕Command1,標簽Label1中顯示的是0(　　)
Private Sub Command1_Click()
Dim x As Integer, y As Integer
Dim z As Integer, t As Integer
x=Val(Text1.Text): y=Val(Text2.Text)
z=Val(Text3.Text)
t=gbs(x, y)
t=gbs(t, z)
Label1.Caption=Str(t)
End Sub
Function gbs(x As Integer, y As Integer) As Integer
If x < y Then
x=x+y
y=x-y
x=x-y
End If
gbs=x
Do While gbs Mod y <> 0
gbs=gbs + x
Loop
End Function
A.9 B.14 C.17 D.24
答案 D
解析 自定義函數gbs的功能是求兩個數x、y的最小公倍數。本題求解的是三個數x、y、z的最小公倍數。
12.某對分查找算法的 VB 程序段如下:
i=1:j=6:n=0:f=False
key=val(Text1.Text)
Do while i<=j and f=False
n=n+1
m=(i+j)2
If key=d(m) then f=True
If keyLoop
數組元素 d(1)到 d(6)的值依次為“13,18,25,30,35,59”。文本框 Text1 中輸入 33 后運行該程序,運行結束后下列說法不正確的是(　　)
A.變量 f 的值為 False B.變量 i 的值為 5
C.變量 m 的值為 4 D.變量 n 的值為 2
答案 D
解析 程序運行過程中,各變量的變化情況如下表所示:
第幾次
i
j
m
f
n
1
1
6
3
false
1
2
4
6
5
false
2
3
4
4
4
false
3
5
4
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.某大學院校研究男女學生學習成績的差異性,相關數據在Excel表中如圖a所示。
/
圖a
請回答下列問題:
(1)在L4單元格中使用SUMPRODUCT函數計算男生在所有科目考試中獲得80-100分的總人數,則L4單元格中的公式是　　　　　　　　　　　　　　　　。?
(提示:SUMPRODUCT函數返回相應的數組或區域乘積的和。例如:=SUMPRODUCT((C4:C11=″高等數學″)?? (D4:D11))表示在數據區域D4:D11中統計科目是高等數學的數值總和)
(2)根據圖a所示,區域A3:I11數據已進行了排序,則排序的次要關鍵字是　　　　。?
(3)根據圖a中數據制作的圖表如圖b所示,創建該圖表的數據區域是　　　　　　　　　。?
/
圖b
(4)變更D4單元格數值為4,圖表　　　　(選填:會/不會)發生變化。?
答案 (1)=SUMPRODUCT((B4:B11=″男″)*(D4:E11))　(2)合計(或I列)　(3)C3:H3,C12:H13　(4)會
解析 (1)略(2)觀察數據可知,排序主要關鍵字為科目,科目相同則按照合計降序排列,所以次要關鍵字為合計。(3)由圖表橫坐標可知D3:H3為數據區域,由圖例可知D12:H13也是數據區域,再加上區域C3,C12:C13,合并這些區域為C3:H3,C12:H13。改變D4的值,會引起D12的改變,D12在圖表的數據區域中,所以會引起圖表的變化。
14.有一種數字加密算法如下:將該位數字與其位置號相加得到x,x除以11的余數即為編號,若余數為0,編號取11,再從密碼表中找出與編號對應的加密字符,其密碼表如下:
編號
1
2
3
4
5
6
7
8
9
10
11
加密字符
c
a
n
I
h
e
l
p
Y
o
u
例如:數字2017加密過程為:
數字
2
0
1
8
位置
1
2
3
4
編號
3
2
4
12 mod 11=1
加密字符
n
a
I
c
按照上述方法,設計一個數字加密的VB程序,運行程序時,在文本框Text1中輸入明文數字,單擊“加密”按鈕Command1,程序將明文加密,并將加密后的密文顯示在文本框Text2中。程序運行效果如圖所示,
/
(1)實現上述功能的VB程序如下,請在劃線處填入合適代碼。
Private Sub Command1_Click()
Dim mmb As String, s1 As String, s2 As String,x As Integer
mmb = "canIhelpYou"
s1 =①　　　?
For i = 1 To Len(s1)
x = Val(Mid(s1, i, 1)) + i
x =②　　　?
If x = 0 Then x = 11
s2 =③　　　?
Next i
Text2.Text = s2
End Sub
(2)若密文是“aIhc”,則明文是　。?
答案 (1)①Text1.Text　②x Mod 11　③s2 & Mid(mmb, x, 1)
(2)1228
解析 (1)①處變量s1存放明文,即從文本框Text1中獲取的數字。然后通過循環對明文中的數字逐個加密。②處是對編號x進行除11取余計算。③處根據編號x取出加密字符,并存入s2。(2)根據加密算法,可知解密算法是:(11+(編號-位置) mod 11) mod 11,則密文“aIhc”的解密過程如下:
加密字符
a
I
h
c
編號
2
4
5
1
位置
1
2
3
4
數字
1
2
2
8
15.李路利用Flash軟件制作了電視劇《人民的名義》的人物介紹動畫,其中“load”場景部分制作界面如圖所示,
　　　　 　　　　　　 　　　　　
/
(1) “片名”圖層第30幀中的對象屬性如上圖所示,該圖層第8幀到第30幀實現了文字“人民的名義”由大變小的動畫效果,則該動畫類型為　　　　　　　　　(選填:動畫補間/形狀補間/逐幀動畫)。?
(2)要在動畫一開始就同時出現“反貪局長”“市委書記”“省委副書記”和“省委書記”4個圖層的補間動畫,應做的調整是?
　。?
(3)load場景動畫播放完后,背景圖層中的音樂還在播放,說明聲音同步模式可能是　　　　　　　　(多選,選填:數據流/事件/開始/停止)。?
(4)為實現load場景動畫播放完后自動停止,李路選中“省委書記”圖層最后1幀添加停止動畫的動作腳本,但測試影片時動畫放到一半就停止了,其原因是　。?
(5)測試影片時,單擊“侯亮平”按鈕,動畫跳轉到“侯亮平”場景第1幀播放,則“侯亮平”按鈕的動作腳本為?
　。?
答案 (1)動畫補間　(2)把市委書記圖層第8至14幀移到第1至7幀　(3)事件或開始　(4)“省委書記”圖層最后1幀是普通幀,動作腳本實際被添加到第7幀,所以動畫播放到第7幀就停止了　(5)on(press){gotoAndPlay("侯亮平",1);} 或 on(release){gotoAndPlay("侯亮平",1);}
解析 (1)由屬性面板可知,“片名”圖層第30幀中的對象類型是靜態文本,所以動畫只能用動畫補間實現。(2)略。(3)若聲音是數據流模式,動畫停止聲音同時停止。若是停止模式,則是停止指定的聲音。(4)略。(5)在按鈕中加載的動作要以on函數開頭。
16.有n個不相同且不為0的數(1<=n<=100),小明通過學習排序算法后很容易求出第r個大的數。如果不用排序,要求出其中第r個大的數(1<=r<=n),即有r-1個數比它大,其余的數都比它小。例如輸入:2,13,49,17,21,6,其中第3個大的數為17。為此,小明編寫了VB程序,數組a記錄n個數,然后從第一數開始,將它與其余的數進行比較并記錄出比它大的數的個數(存于變量y中),若y=r-1時,得到所求結果,否則對下一個數進行同樣的處理。程序運行時,在文本Text1中輸入r的值,單擊按鈕Command1后,在文本Text2中輸出第r個大的數。實現上述功能的VB代碼如下,但加框處代碼有錯,請改正。
Const n = 100
Dim a(1 To 100) As Integer
Dim r As Integer
Private Sub Form Load()
　'本過程依次讀入n個互不相同且不為0的數,并存儲在數組a中
　'代碼略
End Sub
r=Val(Text1.Text)
Private Sub Command1_Click()
　Dim i As Integer, j As Integer, x As Integer, y As Integer
　Dim p As Boolean
　p=True
　i=1
　Do While p
x=a(i)
y=0
For k=1 To n
　If x > a(k) Then y=y+1　'①
Next k
If y=r-1 Then
　p=False
End If
i=i+1
　Loop
　Text2.Text=Str(a(i)) '②
End Sub
答案 ①x < a(k)　②Str(a(i-1)) 或 Str(x)
解析 ①程序使用枚舉算法統計比a(i)大的數量y,如果y=r-1,則找到目標,do循環結束,最后顯示元素值a(x)。因為當找到目標后,i又加了1,所以實際元素編號為i-1,②處可以是Str(a(i-1)) 或 Str(x)。
17.在數組a中按順序找出一組升序子序列,可以不連續,但要求長度最長。例如:數組a的值分別為2,11,4,13,5,7。升序子序列分別有[2,11]、[2,4]、[2,11,13]、[2,4,13]、[2,4,5]、[2,4,5,7]、[11,13]、[4,13]、[4,5]、[4,5,7]、[5,7],其中最長升序子序列是[2,4,5,7]。
算法思路如下:
a.求以a(i)為結尾元素的最長升序子序列時,找到所有序號j(j=1,2……i-1),且a(j)=d(i)(d(i)記錄i位置的最長升序子序列長度),那么就增加i位置的最長升序子序列長度,并記錄該升序子序列倒數第二個位置。
b.在d數組中找出最大值,即最長升序子序列長度。
c.例如,2、11、4、13、5、7,d(1)=1,d(2)=2,d(3)=2,d(4)=3,d(5)=3,d(6)=4,所以最長升序子序列長度為4,是以a(6)為結尾元素。
現設計了如下VB程序,界面如圖所示,請回答下列問題:
/
(1)觀察上圖,最長升序子序列的數據是　　　　　　　　。?
(2)請在劃線處填入合適的代碼。
Const n=9
Dim a(1 To n) As Integer
Private Sub Form_Load()
'生成n個[1,10]范圍的隨機數,存儲在a數組,并顯示在列表框List1。代碼略
End Sub
Private Sub Command1_Click()
Dim d(1 To n) As Integer　　　'記錄i位置的最長升序子序列長度
Dim pre(1 To n) As Integer '記錄i結尾的最長升序子序列前一數據的位置
Dim st As String,i As Integer,k As Integer,maxlen As Integer
For i=1 To n
d(i)=1
Next i
For i=2 To n
For j=1 To i-1
If a(j)=d(i) Then
　　d(i)=　①　?
　　pre(i)=j
End If
Next j
Next i
maxlen=0:k=0
For i=1 To n
If 　②　 Then maxlen=d(i):k=i?
Next i
Do While k<>0
st=a(k) & ″,″ & st
　③　?
Loop
Text1.Text=Mid(st,1,Len(st)-1)
End Sub
答案 (1)3,4,6,7,9　(2)①d(j)+1　②d(i)>maxlen　③k=pre(k)
解析 (1)略　(2)①如果a(j)=d(i),說明以a(j)為倒數第2個元素的升序序列中,元素個數較多,則令以a(i)為結束元素的升序元素個數d(i)=d(j)+1。同時記錄i結尾的最長升序子序列前一數據的位置,即把j記錄到pre(i)中。②處所在循環找出最長序列的結束元素下標k和其長度,其中變量maxlen記錄最長序列的長度。③處循環顯示最長序列中的各元素,變量k記錄a(k)的前一個元素下標,該下標記錄在d(k)中。
綜合測試卷(二)
　綜合測試卷第17頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.下列有關信息的說法,不正確的是(　　)
　　　　 　　　　　　 　　　　　
A.網購時應關注商品的“評價信息”,其中“個人推薦”的可信度較低
B.虛擬現實是信息技術發展的方向之一
C.手機微信登錄時,增加了聲音鎖驗證方式,有效提高了信息的安全性
D.BBS是一種常用信息交流方式,無需登錄就能進行發帖、跟帖
答案 D
解析 在BBS中進行發帖、跟帖需要先登錄。
2.下圖是QQ郵箱撰寫電子郵件的部分界面,以下說法正確的是0(　　)
/
A.若點擊“發送”,郵件將直接發送到收件用戶的電腦上
B.收件人和發件人信箱都在同一個郵箱服務器上,所以發送郵件無須SMTP協議
C.收件人通過SMTP協議從服務器上收取郵件
D.該郵箱可對郵件信息進行加密后再發送,收件人需要知道密碼方能解密郵件內容
答案 D
解析 點擊“發送”,郵件發送到收件人郵箱服務器中。收件人和發件人信箱都在同一個郵箱服務器上,發送郵件還須SMTP協議。收取郵件使用的是POP3協議。
3.下列關于字處理的說法,錯誤的是(　　)
A.Docx、TXT格式文件的主要內容一般是文本
B.輸入文本、設置字體及段落格式是字處理的基本操作
C.寫一篇征文可以使用Word、WPS、Premiere軟件
D.閱讀“可視化之美.pdf”電子書可以使用Adobe Reader軟件
答案 C
解析 Premiere是視頻剪輯軟件。
4.某7位二進制數11□□□01,其中有3位未知,下列數值可能和它相等的是(　　)
A.(99)10 B.(64)16
C.(65)16 D.(98)10
答案 C
解析 (65)16=(1100101)2
5.使用Access軟件進行學生信息管理。已有數據表視圖如甲圖所示,部分數據存儲在Excel表中如乙圖所示,下列說法正確的是0(　　)
/
甲
/
乙
A.甲圖當前狀態下,可以設置字段“出生年月”的顯示格式
B.甲圖中字段“性別”修改為文本類型后,顯示為男或女
C.乙圖中數據全部拷貝入“學生信息”表中,第4條記錄“ID”字段值一定為“10”
D.乙圖b中數據全部拷貝入“學生信息”表中,第4條記錄出生年月顯示為“2000年2月9日”
答案 A
解析 性別字段類型為“是/否”型,修改為文本類型后,打鉤的顯示為yes,不打鉤的顯示為no。ID字段的數據類型是“自動編號”,其數據由Access自動產生,若有記錄被刪除,該記錄ID值不會再出現,即之后添加的記錄不會出現被刪除的ID,對于選項C,第4條記錄“ID”字段值不一定為“10”,這要看ID字段曾經出現過的最大值,若是9,則新添加的記錄ID才是10。復制過來的數據會按照字段的數據格式顯示,所以對于選項D,第4條記錄出生年月顯示為“2000/2/9”。
6.某算法的部分流程圖如圖所示。執行該流程圖,則輸出s的值是0(　　)
/
A.11 B.25 C.36 D.49
答案 C
解析 該流程圖是一個循環結構算法,循環條件是k<15,每次循環判斷s的值,如果s>30,循環結束,否則執行s=s+k,k=k+2。
7.GoldWave軟件編輯某音頻文件操作界面如圖所示,
/
以下說法不正確的是(　　)
A.該音頻是雙聲道Wave格式文件
B.當前選中的音頻時間長度約為半分鐘
C.現對該音頻的后10秒設置“淡出”效果并按原格式、原參數保存,存儲空間不變
D.若執行“剪裁”操作,存儲空間將變為原來的
2
3
答案 D
解析 若執行“剪裁”操作,則只保留選中的音頻。音頻原長90秒,當前選中30秒,執行“剪裁”操作后,音頻時長為30秒,存儲空間將變為原來的
1
3
。
8.使用PhotoShop軟件制作“放風箏”作品,部分界面如圖所示。下列說法正確的是(　　)
/
A.可對“放飛”圖層直接設置濾鏡效果
B.無需解鎖,使用漸變工具可以直接填充背景圖層顏色
C.將“放飛”圖層的圖層樣式清除時“心情”圖層的圖層樣式不會清除
D.“心情”圖層中的文字“心情”可以使用文字工具進行修改
答案 C
解析 “放飛”圖層是文字圖層,不能添加濾鏡。背景圖層全部鎖定,不能對畫布內容進行修改。“放飛”和“心情”圖層是鏈接的,只有當對其中一個圖層進行自由變換時,另一個圖層內容也會隨之變化,其他操作不影響鏈接圖層。“心情”圖層是位圖圖層,無法使用文字工具修改。
9.如下圖所示的按鈕元件,測試影片時,當鼠標指針移動到按鈕上時無法響應鼠標操作,以下操作可使按鈕正常響應鼠標操作的一項是(　　)
/
A.刪除“圖案”圖層點擊幀
B.在“聲音”圖層的彈起幀插入聲音文件
C.將“圖案”圖層的第3-4 幀刪除
D.在“聲音”圖層的點擊幀插入關鍵幀
答案 C
解析 按鈕的“點擊”幀的功能是提供按鈕的可點擊區域,點擊幀為空白,因此不能響應鼠標事件。解決這一問題有兩種思路:在點擊幀繪制可點擊區域,或者刪除按鈕中最后的空白幀。當按鈕不存在點擊幀時,播放頭能播放到的最后一幀作為按鈕的點擊區域。C 選項中刪除3—4 幀后,播放頭能播放到的最后1幀是第2幀,該時刻的畫面作為可點擊區域。按鈕就可以響應鼠標事件。
10.一幅寬高為1024?? 512像素的BMP圖像文件,其存儲容量約為0.5MB,則該幅圖像每個像素點能表達的顏色數量是(　　)
A.2種 B.8種 C.256種 D.65536種
答案 C
解析 BMP圖像文件存儲容量=寬?? 高?? 量化位數/8,由此公式可求出量化位數是8位,8位二進制數最多能表示256種色彩。
11.對經典的選擇排序算法進行如下改進:在數組的所有元素中找出最大和最小數據的元素,然后將這兩個元素分別與第一個和最后一個元素交換數據,在余下的元素中找出最大和最小數據的元素,分別與第二個和倒數第二個元素交換數據,以此類推,直到所有元素的數據按降序排列。VB程序段如下:
p=1: q=10
Do While p　Min=p: Max=p
　For i=p+1 To q
If a(i)If a(i)>a(Max) Then Max=i
　Next i
　t=a(Max): a(Max)=a(p): a(p)=t
①　　
　t=a(Min): a(Min)=a(q): a(q)=t
　p=p+1
　q=q-1
Loop
要使程序實現上述算法思想,則方框中的語句是(　　)
A.If Max=p Then Min=Max
B.If Min=p Then Min=Max
C.If Max=p Then Max=Min
D.If Min=p Then Max=Min
答案 B
解析 從一組數中找出最大值和最小值的編號max、min,然后把最大值a(max)和a(p)交換。如果最小值恰好就是a(p),而a(p) 和a(max) 已經交換,即最小值實際已經在a(max)中,所以接下來應該是a(max)和a(q)交換,也就是說應該把min替換為max的值。
12.某對分查找算法的VB程序段如下:
L=1:R=10:Key=21
Do While L<=R
m=(L+R)2
If a(m)<=Key Then
L=m+1
Else
R=m-1
End If
Loop
數組元素a(1)到a(10)的值依次為“3,9,21,21,21,21,27,28,39,40”,執行該程序段,變量R、a(R)的值分別是(　　)
A.2,9
B.3,21
C.6,21
D.7,27
答案 C
解析 對分查找過程中,各變量變化過程如下:
L
R
m
a(m)
值
1
10
5
21
6
10
8
28
6
7
6
21
7
7
7
27
7
6
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.用Excel軟件處理分析2017年5月美國SUV銷量排行榜數據,如圖甲所示。請回答下列問題,
/
甲
(1)為計算同比變化情況,選中 E4 單元格Ctrl+C 復制,在 H4 單元格執行 Ctrl+V 粘貼,然后向下填充 H5:H13 區域,則單元格 H13 的公式是　　　　　　　　　　　　　　　　　　　。?
(2)若要對 2017 年 5 月的同比變化數據(第 E 列)進行降序排序,則應選擇的排序區域是　　　　　　　　　　　　　　　　　　　　　　。?
(3)現要篩選出 2017 年 1-5 月銷量(第 G列)位于前 3 名的車型,若選擇 A2:H13 區域,然后執行篩選操作,是否能得到篩選結果,若不能,說明原因:?
?
　。?
(4)小王根據表中數據制作了圖乙所示的圖表,則建立該圖表的數據區域是　　　　　　　　　　　　　　　　　　　　　　　　　。?
2017年5月美國SUV銷量變化情況
/
乙
答案 (1)=(G13-F13)/F13　(2)A4:H13　(3)不能。篩選標記不會出現在G3單元格中,而是在F2中,在此設置的篩選條件是針對F列的。　(4)B4:B13,D4:E13
解析 (1)復制單元格,會以自動填充的形式把單元格公式復制到其他單元格中。所以當把E4 單元格復制到H4 單元格時,在E4單元格中會有公式=(G4-F4)/F4。(2)排序前,需要選中字段名和記錄,但由于第2、3行中有合并單元格,所以不能入選。(4)由圖表x軸可知,區域B4:B13是數據源之一。由柱形圖可知,區域D4:D13是數據源之一。由折線圖可知,區域E4:E13是數據源之一。
14.計算正數a的算術根(近似值)的算法公式如下:
xi+1=
1
2
(xi+
a
x
i
)　　　i=1,2,3,…
計算開始時取x1=a,運用上述算法公式計算x2,然后由x2計算x3,……直到相鄰兩值差的絕對值小于設定的精度0.0001為止。
實現上述算法的VB程序運行界面如圖所示。
/
應用程序界面中,自上而下兩個文本框的名稱分別是Text1和Text2,“計算”按鈕的名稱是Command1。在Text1中輸入a的值,單擊“計算”按鈕,在Text2中顯示正數a的近似算術根。
(1)“計算”按鈕單擊事件處理過程如下,請將程序補充完整。
Private Sub Command1_Click()
Const e=0.00001
Dim a As Double, x1 As Double, x2 As Double
a=Val(Text1.Text)
x1=0:x2=a
Do While ①　　　?
　x1=x2
　②　　　?
Loop
Text2.Text=Str(x2)
End Sub
(2)若把變量x2定義為single,則5的算術平方根顯示結果是　　　　　　　　　　　。?
答案 (1)①Abs(x2- x1) >= e　②x2=(x1+a/x1)/2　(2)2.236068
解析 根據題意,循環的條件是相鄰兩值差的絕對值大于等于設定的精度0.0001,所以①處填Abs(x2-x1) >= e。②處則是運用公式xi+1=
1
2
(xi+
a
x
i
)計算x2,所以填寫x2=(x1+a/x1)/2。數據類型single的有效位數是7位,超過7位則四舍五入,由運行效果可知,變量x2類型若為double,計算結果是2.23606797749998,保留7位有效數字則為2.236068。
15.駱老師要創作一個關于“計算機主板”接口介紹的多媒體作品。請回答下列問題:
(1)在設計作品前,老師進行了相應的分析和規劃。下列屬于創作需求分析的是　　　　　(多選,填字母:A.該作品面向高中生演示播放/B.該作品要求使用Flash影片格式發布/C.該作品采用演示型的結構/D.根據作品內容,制訂該作品的腳本大綱/E.作品尺寸比例要求4∶3)。?
(2)老師使用Flash軟件制作該多媒體作品,如下圖所示。
/
播放動畫時,單擊CPU按鈕,轉到15幀播放有關CPU說明的動畫,由圖可知,功能圖層11幀到16幀的動畫類型是　　　　　　。?
(3)測試影片時,畫面左下角的音樂按鈕呈現喇叭不停播放聲波圖形的動畫,說明按鈕彈起幀中加入了　　　　(單選,填字母:A.圖形實例/B.影片剪輯實例/C.動畫補間動畫/D.形狀補間動畫)。?
(4)音樂圖層中加入了音頻“輕音樂.mp3”,為使該音樂不停地播放(即整首音樂播完后再反復播放,不因動畫停止而停播),應把音頻同步方式設為　　　　(單選,填字母:A.數據流重復/B.數據流循環/C.事件重復/D.事件循環)。?
(5)主板圖層中的補間動畫播放完畢后,按鈕圖層中的“CPU”、“內存插槽”等按鈕開始出現,則應做的修改是　　　　　　　　　　　　　　　　　　　　　。?
(6)單擊CPU按鈕,轉到15幀播放有關CPU說明的動畫,則該按鈕中應添加動作是　　　　　　　　　　　　　　　　　　。?
答案 (1)BCE　(2)動畫補間　(3)B　(4)D　(5)把按鈕圖層第1幀移動到第11幀。　(6)on(press){gotoandplay(15);}或on(release){gotoandplay(15);}
解析 (1)創作需求分析包括的內容有結構類型、設施需求、主題思想、作品內容、發布方式等。應用需求分析包括用戶情況、作品效益、社會需求等內容。選項A屬于應用需求分析中的用戶情況范疇。選項D屬于腳本制作。(2)功能圖層11幀中的對象是圖形實例,說明動畫類型是動畫補間動畫。適用于制作動畫補間的對象包括實例、組、繪制對象、文本。用于制作形狀補間的對象包括形狀、繪制對象。(3)按鈕的彈起幀只有一幀,不能制作動畫,只能加入影片剪輯實例實現按鈕的動畫效果。因為影片剪輯內部可以制作動畫,將其置于其他場景或元件中,影片剪輯內部的動畫可循環播放。(4)數據流音樂會隨動畫停止而停播。重復模式可以指定播放次數,但不能使音樂不停地播放。(5)主板圖層中的補間動畫到第10幀完成,所以要使按鈕圖層的內容從第11幀開始出現,可以把按鈕圖層第1幀移動到第11幀。(6)轉到某一幀繼續播放,可以用gotoandplay函數實現。
16.對班級學生進行排隊,要求分別對男女生按身高進行升序排序,排序后男生在前,女生在后。排序示例如下。
排序前
男
女
女
男
女
男
男
男
女
女
180
161
165
176
160
185
188
170
171
166
排序后
男
男
男
男
男
女
女
女
女
女
170
176
180
185
188
160
161
165
166
171
實現上述功能的VB程序如下,但加框處代碼有錯誤,請改正。
Const n=20
Dim a(1 To n) As Integer,b(1 To n) As String
Private Sub Command1_Click()
Dim s As String,i As Integer,j As Integer,t1 As Integer,t2 As String
'讀取身高和性別數據,分別存儲在數組a和b中,代碼略
For i=1 To n-1
For j=n To i+1 Step-1
s=b(j)+b(j-1)　　　　　　'①
If a(j-1)>a(j) Then '②
　　t1=a(j-1):a(j-1)=a(j):a(j)=t1
　　t2=b(j-1):b(j-1)=b(j):b(j)=t2
ElseIf s=″女男″ Then
　　t1=a(j-1):a(j-1)=a(j):a(j)=t1
　　t2=b(j-1):b(j-1)=b(j):b(j)=t2
End If
Next j
Next i
'依次輸出排序后的數據。代碼略
End Sub
答案 ①b(j-1)+b(j)　②a(j-1)>a(j) and b(j)=b(j-1)(或a(j-1)>a(j) and (s=″女女″or″男男″))
解析 排序中需要交換的有兩種情況,第一種是性別相同但相鄰兩人身高是降序的,第二種情況是相鄰兩人女的在前男的在后。
17.由非負整數a生成非負整數b的方法描述如下:
　　　　 　　　　　　 　　　　　
a.將數a各位數字分離后存入整數數組num;
b.互換數組num任意兩個下標對應的元素至多一次,得到一個新的數組num;
c.將num轉換成非負整數b輸出,要求數b是上述步驟(2)中,所有可能的互換組合中,構成數值最大的數,例如:2376→7326。
根據上述描述設計如下VB程序,請回答下列問題:
(1)當a=62465時,最大的整數b是　　　　。?
(2)請在劃線處填入合適代碼
Private Sub Command1_Click()
Dim a As Long,b As Long,c As Integer,n As Integer
Dim num(1 To 100) As Integer,flag As Boolean
Dim last(0 To 9) As Integer
a=Val(Text1.Text):n=Len(Text1.Text)
c=n
Do While a<>0
num(c)=a Mod 10
a=a10
c=c-1
Loop
for i=0 to 9
last(i)=0
next i
For i=1 To n　　'計算數組中每個元素最后一次出現的下標
last(num(i))=i
Next i
flag=True
For i=1 To n
If flag Then
For c=9 To num(i)+1 Step-1
　　If 　①　 Then?
　　　　tmp=num(i)
　　　　　②　?
　　　　flag=False
　　　　Exit For
　　End If
Next c
End If
Next i
b=0
For i=1 To n
b=　③　?
Next i
Text2.Text=Str(b)
End Sub
答案 (1)66425　(2)①last(c)>0　②num(i)=c:num(last(c))=tmp　③b*10+num(i)
解析 (1)略　(2)設輸入數a=3276,算法思想是:先把a的各位數字存入數組num,即num(1)=3,num(2)=2,num(3)=7,num(4)=6。然后計算每個數字最后一次出現的下標,得到last(2)=2,last(3)=1,last(6)=4,last(7)=3。
接下來找交換數字的位置,方法是:先設要交換的其中一個數字是第1位數字,即num(1),為3,然后從num(2)到num(4)中找出比num(1)大的最大數字,程序中采用的方法是從9到4(4源于num(1)+1)進行逐個查找,其中首先出現的數字,即為交換目標。
某個數字c在num中是否存在,只須判斷last(c)>0即可。本例中,last(9)=0,last(8)=0,last(7)=3,則第1位的3(3即num(1))和第3位的7(即num(last(c)))進行交換。成功,結束查找。
若數字9到4在num(2)到num(4)中未出現,說明沒有比num(1)大的數字,num(1)不能交換。進行第2輪查找,先設要交換的其中一個數字是第2位數字,即num(2),為2,然后從num(3)到num(4)中找出比num(2)大的最大數字,如果存在,則交換成功。如果沒有,進行第3輪查找。
綜合測試卷(五)
　綜合測試卷第29頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.在微信公眾號中發布信息時,會彈出一個二維碼,如下圖,只有管理員或運營者用手機掃碼之后才能發布,這樣做的目的是為了0(　　)
　　　　 　　　　　　 　　　　　
/
A.信息發布的安全性 B.信息發布的便捷性
C.信息發布的規范性 D.手機發布信息
答案 A
解析 為防止信息發布的安全性,微信公眾號系統設置一些安全措施,比如群發前要求管理員掃描二維碼或輸入手機驗證碼等。
2.使用UltraEdit軟件觀察字符內碼,結果如圖所示:
/
下列說法正確的是(　　)
A.圖中內碼表示的ASCII碼字符共有5個
B.字符“e”內碼用二進制表示是1000001
C.字符“A教”內碼用十六進制表示是41BDCC
D.字符“x”內碼轉十進制過程應為7×162 +8×161
答案 C
解析 ASCII碼編碼范圍是0~(7F)16,即ASCII碼均小于(7F)16,所以圖中內碼表示的ASCII碼字符共有6個,字符“e”內碼就(65)16,用二進制表示是1100101。字符“x”內碼轉十進制過程應為7×161 +8×160。
3.以下關于網絡協議和網頁保存類型的描述,正確的是(　　)
A.FTP協議負責瀏覽器和Web服務器之間的信息傳輸
B.SMTP協議可以實現將發件人的郵件直接發送到收件人的計算機中
C.通過“網頁,全部(*.htm;?? .html)”方式保存網頁,可以下載網頁上的視頻
D.通過“Web檔案,單個文件(?? .mht)”方式保存網頁,可以同時保存網頁中的圖片
答案 A
解析 FTP協議負責客戶端電腦和Web服務器之間的信息傳輸。SMTP協議可以實現將發件人的郵件發送到收件人服務器。保存網頁時不能下載網頁上的視頻。
4.下列應用中,體現了人工智能技術的是(　　)
①用OCR軟件識別數碼圖片中的文字,并保存為文本文件　②在手機上以聯機手寫的方式輸入短信內容　③用導航儀導航,以語音交互的方式規劃行車路線　④用掃描儀掃描報紙內容,并保存為TIF格式的圖像文件　⑤在Word中輸入一段英語文章,軟件能自動更正拼寫錯誤
A.④⑤ B.①②③
C.①③ D.①②③④⑤
答案 B
解析 常見的人工智能技術有字符識別技術、語音識別技術、機器翻譯和人機對弈等。
5.下圖是 Access 數據庫中的 student 數據表:
/
以下說法正確的是(　　)
A.當前狀態下執行“新記錄(W)”命令,則新添加的記錄位于第 3 行位置
B.當前為數據視圖,無法將“性別”字段修改為文本類型
C.新建記錄時,無法在“出生日期”字段輸入“一九九六年六月一日”
D.存儲“性別”字段的值,需要的存儲空間為 1 bit
答案 D
解析 在Access 數據庫中,新添加的記錄位于最后一條。數據視圖和設計視圖都可以添加、刪除、修改字段。“出生日期”字段可以輸入“一九九六年六月一日”或“1996年6月1日” 或 “1996/6/1”等有效形式。
6.某算法的流程圖如圖所示,執行這部分流程后,輸出a的值是0(　　)
/
A.0 B.7 C.14 D.21
答案 B
解析 該流程圖表示的算法是要計算a、b的最大公約數。
7.關于數據冗余和數據壓縮,下列說法正確的是(　　)
A.某些圖像從區域上看存在較強的紋理結構,這屬于空間冗余
B.視頻前一幀圖像與后一幀圖像之間存在較大的相關性,這屬于視覺冗余
C.多媒體數據能被壓縮是因為存在冗余信息,但是壓縮過程中不允許有失真
D.用 WinRAR 把整個文件夾中的所有內容壓縮成 RAR 文件,這屬于無損壓縮
答案 C
解析 某些圖像從區域上看存在較強的紋理結構,這屬于結構冗余。視頻前一幀圖像與后一幀圖像之間存在較大的相關性,這屬于時間冗余。多媒體數據能被壓縮是因為存在冗余信息,壓縮過程中允許有失真,即可以用有損壓縮形式。
8.使用GoldWave軟件編輯“演出.wav”文件,選擇其中一段音頻后的部分編輯界面如圖所示。下列說法正確的是(　　)
/
A.該音頻量化位數是16位,采樣頻率是128 kbps
B.當前狀態下,執行“剪裁”操作,則音頻文件總時長變為10秒
C.當前狀態下,執行“刪除”操作,則左聲道第10秒到第20秒變為靜音
D.當前狀態下,執行“插入10秒靜音”操作,按原參數保存文件,則音頻文件的容量變為原來的4/3
答案 D
解析 該音頻量化位數是16位,采樣頻率是44100 Hz,比特率是1411 kbps。當前狀態下,只選擇了左聲道,執行“剪裁”或“刪除”操作,音頻文件總時長都不會變。當前狀態下,執行“刪除”操作,則左聲道第20秒到第30秒變為靜音。執行“插入10秒靜音”,時長變為40秒,所以容量變為原來的4/3。
9.使用Flash軟件制作動畫作品,部分編輯界面如下圖所示。其中“蜻蜓”圖層第40幀有動作命令gotoAndStop(“load”,10);“蜻蜓”圖層利用“蜻蜓”元件實例制作了從左到右飛出舞臺的動畫效果;“聲音”圖層中聲音的同步屬性為“數據流”。下列說法不正確的是(　　)
/
A.“蜻蜓”元件的類型可能為“影片剪輯”
B.當前狀態下,可以在“背景”圖層第15幀插入關鍵幀
C.測試場景時,播放到最后一幀,動畫會自動跳轉并停止在load場景第10幀
D.若要聲音播放2秒后停止,可以在“聲音”圖層第25幀插入空白關鍵幀
答案 C
解析 測試場景時,只會生成當前場景main的動畫,而不會生成load場景,播放到最后一幀,動畫自然也無法跳轉到load場景。
10.某Flash作品部分界面如下圖所示:
/
其中“圖層1”圖層的聲音來自“bg.wav”,其相關信息為“Wave PCM signed 16 bit , 44100Hz,Stereo”,動畫播放至60幀時,聲音剛好播放一遍,則此聲音文件的大小約為(　　)
A.0.5MB B.1.01MB
C.1.51MB D.8.07MB
答案 B
解析 未壓縮的WAV格式音頻文件容量=采樣頻率?? 量化位數?? 聲道數?? 時間/8。本題采樣頻率是44100Hz,量化位數是16位,聲道模式為stereo,即聲道數是2,時間是60/10=6秒,則容量=44100?? 16?? 2?? 6/8/1024/1024≈1.01MB。
11.有如下程序段:
For i = 1 To 2
For j = 1 To 5 - i
If a(j)> a(j + 1) Then
　　k=a(j):a(j)=a(j+1):a(j+1)=k
End If
Next j
Next i
數組元素a(1)到a(5)的值依次為“70,50,60,20,30”,經過該程序段“加工”后,數組元素a(1)到a(5)的值依次為(　　)
A.20,30,50,60,70 B.70,60,50,30,20
C.50,20,30,60,70 D.50,60,20,30,70
答案 C
解析 這是一個冒泡排序算法程序,每一遍排序從第1個元素開始兩兩比較,把大數交換到后面(沉到下面)。排序執行2遍,即把最大的兩個數交換到數組最后。
12.小明編寫了一個統計數組元素a(1)到a(n)中的“升序段”個數s(如圖所示的數據序列,其升序段個數為3)的VB程序,部分程序如下:
升序段
　　
　　升序段　　
　　　　
　升序段
8,　34,　12,　21,　56,　78, 43,21, 37, 52, 9
k=0:s=0
for i=2 to n
if a(i)>a(i-1) then
　　　　　　　　　　　?
else
k=0
end if
if k=1 then s=s+1
next i
text1.text=str(s)
劃線處的正確語句是(　　)
A.k=k-1 B.k=k+1 C.k=-1 D.k=1
答案 B
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.有一批未經壓縮的BMP格式的圖片文件,經格式轉換后,文件大小發生改變,小李使用Excel軟件對不同的圖片格式進行研究,如圖甲所示。請回答下列問題:
/
甲
(1)區域E2:E17中的數據表示的是未經壓縮的BMP格式圖像的存儲容量,通過對區域B2:D17的數據計算求得,可以在E2單元格輸入公式　　　　　　　　　　　　　　　　　　　,并向下填充至E17單元格。?
(2)若在某次修改后,H12單元格顯示內容為“#DIV/0!”,則可能的原因是　　　　　　　　。(單選,填選項前的字母)?
A.E12單元格的內容被刪除
B.G12單元格的內容被刪除
C.H列的列寬被縮小
D.G12單元格的內容被改為“JPEG”
(3)小李對區域A1:H17數據進行篩選,篩選方式如圖乙所示,則被篩選出的數據條數為　　　。?
/
乙
(4)為了更直觀地反映不同圖像格式存儲容量的變化,小李創建了如圖丙所示的圖表,該圖表的數據區域為　　　　　　　。?
/
丙
答案 (1)=B2*C2*D2/8/1024　(2)B　(3)4　(4)A1:A17,E1:E17,G1:G17
解析 (1)未壓縮圖片容量=寬度?? 高度?? 顏色位數/8,據此可以計算圖像原大小。(2)H12計算的是壓縮比,壓縮比=原大小/轉換后大小,H12單元格中的公式可能是=E12/G12,運算結果顯示內容為“#DIV/0!”,表明公式中除數為0,所以可能是G12單元格的內容被刪除。(3)由題圖可知,篩選條件是原大小大于5000,轉換后的大小小于3000,滿足這2個條件的記錄是4條。(4)由X軸可知,圖片序號所在列A1:A17是該圖表數據源,由圖例可知,原大小和轉換后的大小2列也屬于數據源。
14.某網絡服務平臺,要求新注冊的用戶名必須以字母開頭,由字母(區分大小寫)、數字和下劃線中的6~18個字符組成,且必須包含這3類字符。編寫一個VB程序,判斷用戶名的正確性,具體功能如下:在文本框Text1中輸入用戶,單擊“檢測”按鈕,在標簽Text2中輸出結果。程序界面如圖所示:
/
(1)由下面代碼可知運行界面中“檢測”按鈕的對象名是　　　　。?
(2)實現上述功能的VB程序如下,請在劃線處填入合適的代碼。
Private Sub Btn_Click()
Dim s As String,n As Integer,i As Integer
Dim n1 As Integer,n2 As Integer,n3 As Integer
s=Text1.Text
　①　?
ch=Mid(s,1,1)
If n<6 Or n>18 Then
Text2.Text=″用戶名錯誤″
Exit Sub　'退出當前子程序
End If
If Not (ch>=″a″ And ch<=″z″ Or ch>=″A″ And ch<=″Z″) Then
Text2.Text=″用戶名錯誤″:Exit Sub
End If
For i=2 To n
ch=Mid(s,i,1)
If ch>=″a″ And ch<=″z″ Or ch>=″A″ And ch<=″Z″ Then
　n1=n1+1
ElseIf ch>=″0″ And ch<=″9″ Then
　n2=n2+1
ElseIf ch>=″_″ Then
　n3=n3+1
End If
Next i
If 　②　 Then Text2.Text=″用戶名錯誤″ Else Text2.Text=″用戶名正確″?
End Sub
(3)若文本框Text1中輸入的內容為“XWang”,點擊“檢查”按鈕后,標簽Label2中顯示的內容是　　　　　　　。?
答案 (1)Btn　(2)　①n=Len(s)　或n=Len(Text1.Text)　②n1+n2+n3n-1 or n2*n3=0)　(3)用戶名錯誤
解析 (1)由事件處理過程中的語句Private Sub Btn_Click(),可以看出按鈕的名稱是Btn。
(2)①處計算用戶名長度,并把長度值存入變量n。②處判斷用戶名的正確性,在循環中可知,用戶名中的字母數存放在變量n1中,數字數存入在變量n2中,下劃線則存入變量n3中,3種字符總數等于n-1,其中第1個字母已在循環前作了判斷,如果用戶名中出現了規定以外的字符,則n1+n2+n315.小王制作多媒體作品,用PhotoShop軟件制作一張背景圖片,使用的素材和制作界面分別如甲圖所示;然后使用Flash軟件制作動畫,制作界面如乙圖所示,請回答下列問題。
/
甲
/
乙
(1)如甲圖所示,小王要對“狐”圖層中的“狐”字填充為暗紅色,以下方法可行的有　　　　(填字母,多選:A.使用油漆桶工具進行填充/B.使用文字工具將其設置為暗紅/C.用魔棒選中狐字,再用畫筆把它涂成暗紅/D.給圖層添加顏色疊加的樣式,疊加的顏色設置為暗紅色)。?
(2)如乙圖所示,背景動畫開始時,音樂仍然在播放,說明背景第1幀中設置的音樂同步模式為　　　　。?
(3)當其他動物從第65幀開始出現時,要求“文字”圖層中的文字消失,為了達到該效果,應進行的操作是?
　。?
(4)小王對庫中的“成語詳解”元件進行編輯,部分界面如丙圖所示。
/
丙
若要使鼠標指針經過該按鈕時播放聲音,當前狀態下聲音素材可以直接添加的圖層是　　　　　　　　　(填圖層名稱)。?
(5)測試影片時,單擊“成語詳解”按鈕,在瀏覽器中顯示該影片所在文件夾中的“cyxj.txt”文件內容,那么在該按鈕上添加的腳本命令是　　　　　　　　　　　　　　　　　　　　　　。?
答案 (1)ACD　(2)事件(或開始)　(3)在文字圖層65幀插入空白關鍵幀或轉換為空白關鍵幀　(4)圖層2　(5)on(release){gerURL(″cyxj.txt ″);}
解析 (1)狐圖層是位圖,不能用文字工具修改顏色。
(2)如果音樂同步模式設置為數據流,遇到關鍵幀音樂會停止,即背景動畫開始時音樂會停止,所以要用事件或開始模式。
(3)要使對象消失,可把此時所在幀變為空白關鍵幀。
(4)只有關鍵幀中才能添加、刪除、修改對象。
(5)制作超鏈接效果可用動作getURL。按鈕中的動作須以on函數頭。
16.平面上有 N (3≤N≤100)個房間圍成一圈,按順時針方向分別編號為 1…N,相鄰的兩個房間之間均有一扇門,第i個房間居住人數為 a(i)。初始時選擇一個房間,將所有人都聚集在該房間,接著每個人都按順時針方向走到相鄰的房間,直到走到居住的房間。一個人每經過一扇門花費 1 的能量,請確定初始房間,使得所有人花費的能量和最小。 例如:N=5,a(1)=1,a(2)=5,a(3)=9,a(4)=8,a(5)=4 最佳方案:初始時所有人聚集在2號房間,花費的能量和:3?? 1+4?? 5+0?? 9+1?? 8+2?? 4=39。
為了解決這個問題,小明編寫了一個 VB 程序。從文本框Text1(程序運行時輸入各房間人數,人數小于10,用逗號隔開)中讀取 N個房間的居住人數,人數存儲在數組 a 中。點擊窗體上的按鈕 Command1, 程序枚舉每一種方案(不同的初始房間),計算該方案下的能量和,在文本框 Text2中輸出最優方案的初始房間編號,在文本框 Text3 中輸出最小能量和。 程序運行界面如下圖:
/
實現上述功能的 VB 代碼如下,但加框處代碼有錯,請改正。
Private Sub Command1_Click()
　Dim a(1 To 100) As Integer　'依次存儲各房間的居住人數
　Dim i As Integer, j As Integer, w As Integer, k as Integer
　Dim t As Long, ans As Long,s as string,n as integer
　s = Text1.Text
　n = Len(s) 2 + 1
　For i = 1 To n
　a(i) =val(Mid(s, 2?? i - 1, 1))
　Next i
　k = 0: ans = 32767
　For i = 1 To n
　t = 0
　For j = 1 To n
w = 5 + j - i 　'①
t = a(w)?? j　　 '②
　Next j
　If t < ans Then
k = i: ans = t
　End If
　Next i
　Text2.Text = Str(k)
　Text3.Text = Str(ans)
End Sub
答案 ①w=(n+j-i) mod n　②t+a(j)*w
解析 程序中,變量i用以枚舉初始房間號,w存放從i號房間的人到j號房間消耗的能量,所以1處語句也可以改成:if j>i then w=j-i else w=5-(i-j)。t存放從i號房間的人到各自房間消耗的全部能量總數。
17.數組a()中相鄰兩個數據無重復,現要查找連續最大步長的升序段。具體描述如下:
(1)步長指的是升序段中最后元素和最初元素的差值;
(2)有相同步長的升序段則輸出最先找到的升序段。
程序界面如圖所示。
/
實現上述功能的VB代碼如下:
Dim a(100) As Integer　　'用來存放數據
Dim k As Integer '用來存放數據的數組元素的個數
Private Sub Form_Load()
'從數據庫中讀取數據并存儲在相關數組變量中。并將數據輸出在文本框中。
Text1.Text=s
End Sub
Private Sub Command1_Click()
Dim flag As Boolean,pmax As Integer,mstep As Integer,steps As Integer,max As Integer,st As String,tmax As Integer
st=″ ″:pmax=1:mstep=0:max=0:t=0:tmax=0
If a(2)>a(1) Then flag=True Else flag=False
For i=1 To k-1
If a(i+1)>a(i) Then
If flag=True Then
　　　①　?
　　t=t+1
　　If mstep>max Then
　　　　max=mstep
　　　　pmax=i+1
　　　　　②　?
　　End If
Else
　　mstep=a(i+1)-a(i)
　　t=1
　　If mstep>max Then
　　　　max=mstep
　　　　pmax=i+1
　　　　tmax=1
　　End If
　　flag=True
End If
Else
　③　?
End If
Next i
For i=pmax-tmax To pmax
st=st+Str(a(i))
Next i
List1.AddItem st
End Sub
(1)若數據為“24　7　2　16　25　68　45　32　2
23　46　67　26”,則最大步長的升序段為　　　　　　　　。?
(2)實現上述功能,請在劃線處填入適當的代碼。
答案 (1)2　16　25　68　(2)①mstep=mstep+a(i+1)-a(i)(或mstep=a(i-1)-a(i-6))　②tmax=t　③flag=False
解析 (1)略(2)①處的情況是如果a(i+1)>a(i),表示當前兩數是升序的,且如果flag=True,表示之前的數也是升序的,那么是連續的升序數列,把當前兩數的差累計到步長mstep,即①處填mstep=mstep+a(i+1)-a(i),也可以是當前升序數列中最后元素和最初元素的差值,則①處也可以是mstep=a(i-1)-a(i-t)。如果當前升序段步長大于之前找到的,那么需要更新最大步長max=mstep、結束下標pmax=i+1、以及元素個數tmax=t。所以②處填tmax=t。③處的情況是a(i+1)綜合測試卷(六)
　綜合測試卷第33頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.關于信息安全、網絡道德和知識產權,下列做法正確的是(　　)
　　　　 　　　　　　 　　　　　
A.在觀影時錄制影片并分享到網絡云盤
B.關閉操作系統更新,不安裝系統補丁
C.開啟智能手機的手勢密碼登錄驗證
D.未經許可使用他人相片制作宣傳海報
答案 C
解析 在觀影時錄制影片并分享到網絡云盤是一種盜版行為。關閉操作系統更新,不安裝系統補丁,容易受到網絡攻擊。未經許可使用他人相片制作宣傳海報,這種行為侵犯了他人的肖像權。
2.下圖為在 UltraEdit 軟件中觀察字符內碼的部分界面:
/
以下說法正確的是(　　)
A.存儲字符“℃”需要 1 Byte
B.氣溫之后的冒號采用 ASCII 表示
C.字符“38”的內碼用二進制表示為 0011 1000
D.符號“~”的內碼用十六進制表示為 A1 AB
答案 D
解析 字符“℃”的編碼是A1 E6,需要 2 Byte。氣溫之后的冒號編碼是A3 B1,屬于GB2312碼。字符“38”的內碼是(33 38)16,用二進制表示為00110011 00111000。
3.下列描述屬于人工智能應用范疇的是(　　)
A.地鐵站使用 X 光機對旅客行李進行安檢掃描
B.地圖軟件在有 WiFi 連接的地方自動升級數據
C.高速公路 ETC 通道自動識別車牌收費
D.醫生使用 B 超探測病人身體
答案 C
解析 人工智能應用范疇包括OCR、人機對弈、機器翻譯、語音識別和智能機器人等。
4.瀏覽某網頁的部分界面如下圖所示,下列說法正確的是(　　)
/
A.①處網頁元素需要啟用Adobe Flash Player才能正常顯示
B.訪問當前網頁不需要使用超文本傳輸協議
C.default.html文件采用HTML語言編寫,其中包含圖片
D.當前網頁中不包含超鏈接
答案 A
解析 訪問網頁都需要使用超文本傳輸協議http。網頁文件中不含圖片。鼠標指針變成手形,說明網頁中包含超鏈接。
5.校訊通中某班學生信息用Access打開“學生數據”數據表后如圖所示,下列描述中不正確的是(　　)
/
A.若要防止IC卡號出現重復值,可把它設置為主鍵
B.該數據表共有52條記錄,至少6個字段
C.將班級名稱字段的數據類型設為數字型,原數據會丟失
D.刪除“班級名稱”字段后,記錄數變為51條
答案 D
解析 刪除字段后記錄不會減少。
6.某算法的部分流程圖如下圖所示。執行這部分流程,輸出m的值是(　　)
/
A.0 B.1 C.2 D.9
答案 D
解析 該流程圖的功能是找出x中的最大數字并輸出。
7.將不壓縮圖像a.bmp、b.bmp加工處理后得到不壓縮格式的圖像c.bmp,如圖所示:
/
關于這3幅圖像,下列說法不正確的是(　　)
A.圖像b.bmp與c.bmp的像素個數不相等
B.文件a.bmp的存儲容量要大于b.bmp的存儲容量
C.文件c.bmp的存儲容量為a.bmp與b.bmp的存儲容量之和
D.文件a.bmp的存儲容量等于c.bmp的存儲容量
答案 C
解析 根據圖像容量公式可知,圖像容量與像素個數和色彩量化位數有關,所以a.bmp和c.bmp的存儲容量相等。
8.使用PhotoShop軟件制作“相機”作品,部分界面如下圖所示。下列說法正確的是(　　)
/
A.可對“記錄時光”圖層直接設置濾鏡效果
B.可用油漆桶工具將“背景”圖層填充為藍色
C.可直接對“相機”圖層中的圖像進行水平翻轉操作
D.交換“夾子”與“照片”圖層的順序,不影響作品的呈現效果
答案 B
解析 “記錄時光”圖層是文字圖層,不能直接設置濾鏡效果,須先柵格化。“相機”圖層全部鎖定,畫布中不能作任何修改。夾子圖像位于照片上方,交換兩個圖層位置會影響效果。
9.使用Flash軟件制作一個白云形狀變幻的動畫,部分界面如圖所示。當前補間不成功的原因可能是(　　)
/
A.沒有將“云朵”圖層第 1 幀中的對象分離為形狀
B.“云朵”圖層第 1 幀有多個白云對象
C.動畫類型設置錯誤,應改成補間形狀
D.云朵圖層第9幀中沒有圖像
答案 C
解析 “云朵”圖層第 1 幀中的對象已是形狀,無須再分離,只需把動畫類型設置為補間形狀,動畫就能成功。形狀補間動畫中關鍵幀中形狀可以有多個。云朵圖層第9幀是關鍵幀,其中必有圖象。
10.音頻比特率是指音樂每秒播放的二進制數據量,單位是kbps,即每秒1千個二進制位數。某音頻文件的部分界面如圖所示:
/
則該音頻文件的比特率是(　　)
A.1764kbps B.705.6kbps
C.1411.2kbps D.14112kbps
答案 C
解析 音頻比特率=采樣頻率?? 量化位數?? 聲道數=44100?? 16?? 2=1411.2kbps。
11.某VB程序段如下:
const n=10
dim a(0 to n-1) as integer,i as integer,t as integer
for i=0 to n-1
　a(i)=0
next i
for i=1 to n
　t=int(rnd*n):a(t)=a(t)+1
next i
for i=0 to n-1
　do while a(i)>0
list1.additem i:a(i)=a(i)-1
　loop
next i
執行該程序后,按順序產生的10個隨機數分別是5、6、9、3、9、6、1、1、9、6,在list1中第5個輸出的數字是(　　)
A.6 B.5 C.1 D.10
答案 A
解析 數組a中第i個元素存放的是數字i的個數,list1中按升序方式顯示各個數字,所以第5個數字是6。
12.下列程序段用于在前面部分為升序后面部分為降序的數組a中查找最大值,返回該數值及其位置(下標)。
i=1:j=10:flag=False
Do While i<=j And Not flag
　m=(i+j+1)2
　If a(m)a(m+1) Then
①　?
　ElseIf a(m)>a(m-1) And a(m)>a(m+1) Then
②　?
　ElseIf a(m)>a(m-1) And a(m)③　?
　End If
Loop
List1.AddItem Str(a(m)) +Str(m)
上述程序橫線處可選語句為:(1)i=m+1　(2)j=m-1　(3)flag=True
則①、②、③處語句依次是(　　)
A.(1)(2)(3)
B.(1)(3)(2)
C.(3)(1)(2)
D.(2)(1)(3)
答案 D
解析 如果a(m)a(m+1),說明最大值在左側,則下次查找范圍是i到m-1,所以把j賦值為m-1,①處填j=m-1。如果a(m)>a(m-1)And a(m)a(m-1)And a(m)>a(m+1),說明最大值就是a(m),③處填flag=True。
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.學校收集了高一選修課程滿意率調查數據,并用Excel進行統計分析,如下圖所示,請回答以下問題:
/
(1)單元格區域H3:H16計算滿意率,可先在H3單元格中輸入公式　　　　　　　　　　　　　,再通過H3自動填充其他課程的滿意率。【滿意率=(非常滿意+滿意)/評價人數】?
(2)若要對英語類課程數據以“滿意率”為關鍵字降序排序,則排序前應選擇的數據區域是　　　　　　　　　　　　　　　　　　　　。?
(3)為了通過圖表展現課程的滿意率情況,制作了下圖所示圖表,它的數據區域是　　　　　　　　　　　　　　　　。?
高一英語選修課程滿意率統計圖
/
(4)若通過下圖設置對表格進行篩選,則上題圖表中的柱形變為　　個。?
/
答案 (1)=(D3+E3)/C3　(2)B2:H8　(3)B2:B8,H2:H8　(4)4
解析 (1)根據公式提示,應輸入的表達式是=(D3+E3)/C3,注意不要因為顯示的結果是百分比形式而在公式結尾加%,提示中沒有的符號不要隨意加。(2)根據要求,排序前應選中所有英語類課程記錄,包括字段名。A3是合并單元格,大小和其他單元格不同,所以不能選中A3。(3)圖表的數據區域可根據分類軸數據、圖例來確定。本題圖表分類軸是選修課程名稱,且范圍是“英文影視欣賞”到“英語語法診斷與提高”,所以數據區域含B2:B8。根據圖例可知滿意率一列即H2:H8也屬于數據源。(4)篩選條件是滿意率≥90%,所以“英文歌曲”和“雅思寫作”兩條記錄被篩選掉,還剩4條記錄,圖表中也只剩4個柱形。
14.某木材加工廠需要把購入的木料切割成長度為3米和7米兩種規格的線材。現要求編寫VB程序(運行界面如下圖所示),實現如下功能:在文本框Text1中輸入木材長度,單擊“計算”按鈕Command1,計算出一種廢料長度最小的切割方案,在文本框Text2和文本框Text3中分別輸出該切割方案所得3米和7米兩種規格線材的數量。
/
按此要求編寫的程序如下,請在劃線處填入正確的語句。
Private Sub Command1_Click ()
Dim length As Single '木料長度
Dim min As Single　 '最小廢料長度
Dim x As Integer　'3米規格線材數量
Dim y As Integer　'7米規格線材數量
Dim f As Single　'廢料長度
Dim a As Integer
'廢料最少的切割方案所得3米規格線材數量
Dim b As Integer
'廢料最少的切割方案所得7米規格線材數量
length =①　　　　?
min = length
For x=0 To length3
　y=②　　　　?
　f=length-x*3-y*7
　If f 　　③　　　　?
　　a=x
　　b=y
　End If
Next x
Text2.Text=Str(a)
Text3.Text=Str(b)
End Sub
答案 ①Val(Text1.Text)　②(length-x*3)7　③min=f
解析 ①處是從文本框text1中取出木料長度,②處計算7米規格線材數量,③處是把廢料長度f替換為最新切割方案下的最小廢料長度。
15.小李使用Flash軟件制作主題為“烏衣巷”的多媒體作品。請回答下列問題:
(1)在制作作品前,小李進行了需求分析和規劃設計,并編寫了腳本。下列屬于腳本編寫的是　　　　　(多選,填字母:A.確定作品的結構類型/B.編寫作品的腳本大綱/C.編寫作品的制作腳本/D.進行媒體元素分解)。?
/
圖a
(2)如圖a所示,“詩”圖層第24幀到第48幀實現了“詩”由小變大、由淡變濃的動畫效果,該動畫類型為　　　　　　(填字:動畫補間/形狀補間/逐幀動畫)。?
(3)要實現“詩人”圖層中的人物一開始就出現在舞臺,1秒鐘后出現“詩人”動畫,應做的調整為　　　　　　　　　　　。?
(4)測試影片時,若各場景無交互指令,則場景播放順序為　　　　　　　　　。?
(5)“播放”按鈕的部分編輯界面如圖b所示,測試時鼠標放到按鈕上未呈現小手形狀,以下操作可使按鈕有效的是　　　　　　　(單選,填字母:A.對“背景”圖層“按下”幀進行“清除關鍵幀”操作/B.在“背景”圖層“點擊”幀處插入關鍵幀/C.在“聲音”圖層“按下”幀中插入關鍵幀/D.把“背景”圖層“點擊”幀轉換為關鍵幀)。?
/
圖b
(6)測試影片時,單擊“創作背景”按鈕,實現在瀏覽器中顯示同一文件夾中的“czbj.txt”文件內容并停止所有聲音的播放。則該按鈕上應添加的動作腳本為on(release){　　　　　　　　　}。?
答案 (1)BCD　(2)動畫補間　(3)把“詩人”圖層第12幀中的人物復制到第1幀　(4)load→Main→end　(5)A　(6)getURL(“czbj.txt”);stopAllsounds()
解析 (1)腳本編寫包括:編寫作品的腳本大綱、文字腳本、制作腳本、媒體元素分解表。(2)“詩”圖層第48幀中對象有變換中心,說明該對象是實例,動畫類型只能是動畫補間。(3)略(4)場景播放順序由上而下依次播放。(5)要使按鈕能響應鼠標事件,只要使按鈕中最后一幀中有圖即可。除了選項A可行之外,刪除“背景”圖層“點擊”幀,或者在文字圖層點擊處插入幀也可解決問題。(6)略
16.使用VB程序統計降序數組d中大于key的元素個數,程序如下,但加框處語句有錯誤,請改正。
fun_ction count(key as integer) as integer
dim a as integer,left1 as integer,right1 as integer
left1=1:right1=n
do while left1<=right1
mid1=(left1+right1)2
if key>d(mid1) then　'①
　left1=mid1+1
else
　right1=mid1-1
end if
loop
count=left1 '②
End Sub
答案 ①key解析 程序使用對分查找統計數組d中大于key的元素個數,因為數組d是降序排列的,所以當key17.某校開展“七選三”選課調查,選課數據存數據庫文件“student.accdb”中,如圖甲所示。 “選課”字段存儲 7 位“0”、“1”組成的數串,每位對應一個科目,從左往右依次為“物化生政史地技”,“1”表示選擇,“0”表示未選擇,如“1110000”表示選擇科目“物化生”。小吳設計了一個 VB 程序統計全校選課情況,功能如下:程序啟動時從數據庫中讀入全校學生的選課信息,處理后在列表框 List1 中顯示,單擊“選課統計”按鈕 Command1,在列表框 List2 中按選課人數從高到低輸出各選課組合及人數。程序界面如圖乙所示。
/
甲
/
乙
實現上述功能的 VB 程序如下,請在劃線處填上合適的代碼。
Const s = ″物化生政史地技″
Dim n As Integer　　'n存放學生人數
Dim xk(1 To max) As String　'數組 xk 存儲學生的選課標志
Dim zh(1 To 35) As String,rs(1 To 35) As Integer
'數組 zh 存儲不同選課組合,數組rs 存儲某一組合選課的學生數
Function convert(x As String) As String
Dim i As Integer, st As String
st = ″ ″
For i = 1 To Len(x)
If Mid(x, i, 1) = ″1″ Then st =①　　?
Next i
convert = st
End Function
Private Sub Form_Load()
'從數據庫讀取學生的選課數據存入數組xk中,總人數存入變量n中
'生成 35 種選課組合的“0”“1”數串,存數組 zh
'數組 rs 各元素初始化為 0
'程序略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, temp2 As Integer, temp1 As Integer
For i = 1 To 35
For j = 1 To n
If xk(j) = zh(i) Then ②　　　　　　?
Next j
Next i
For i = 1 To 34
For j = 35 To i + 1 Step -1
If ③　　　　　　　　　　　 Then?
temp1 = zh(j): zh(j) = zh(j - 1): zh(j - 1) = temp1
temp2 =rs(j): rs(j) = rs(j - 1): rs(j - 1) = temp2
End If
Next j
Next i
For i =1 To 35
List2.additem Str(i) + ″　 ″+convert(zh(i))+″ 　″ + Str(rs(i))
Next i
End Sub
答案 ①st + Mid(s, i, 1)　②rs(i)=rs(i)+1　③rs(j)>rs(j-1)
解析 結合程序最后的輸出語句List2.additem Str(i) + ″　 ″+convert(zh(i))+″　 ″ + Str(rs(i))和圖b可以看出,convert自定義函數的功能是把選課數字代碼x轉換為科目名稱,即把代碼x中數字1轉換為對應的科目名稱,所以①處填st + Mid(s, i, 1)。②處所在循環使用枚舉法統計各種組合選課的學生數。③處循環則是按選課人數從高到低對數組rs和zh進行排序。
綜合測試卷(四)
　綜合測試卷第25頁　?
本試題分選擇題和非選擇題兩部分,共4頁,滿分50分,考試時間45分鐘。
選擇題部分
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求)
1.老師常對學生說要多合作交流,集思廣益共同提高,這主要體現了信息的(　　)
　　　　 　　　　　　 　　　　　
A.可加工處理性 B.載體依附性
C.共享性 D.集成性
答案 C
2.下列應用中,體現了人工智能技術的有(　　)
①停車管理系統通過拍攝識別車牌號碼,并用語音進行播報
②智能翻譯機實現實時語音翻譯
③某同學和遠方的朋友視頻通話
④智慧教室能根據光線情況調整照明亮度
⑤手機APP“作業幫“通過攝像頭拍攝題目并上傳后自動給出試題的解題過程
A.①②⑤ B.②④⑤ C.①②④ D.③④⑤
答案 A
解析 人工智能的常見類型有:智能識別(如:語音識別、字符識別、指紋識別…)、機器翻譯、智能機器人、人機對弈等。①②⑤屬于智能識別。
3.關于信息的表達與交流,下列說法正確的是(　　)
A.電子郵件是一種常用的信息交流工具,郵件發送需要使用POP3協議
B.同一種內容的信息可以采用不同的表達方式,HTTP是一種常用的信息表達方式
C.用IE瀏覽器登錄郵箱,發送郵件時將使用HTTP協議發送到收件地址服務器
D.網頁可以包含文本、圖像、超鏈接等基本元素,可使用記事本編輯
答案 D
解析 本題考查學生對于信息表達和交流相關知識的理解。其中 POP3 是郵件接收協議, SMTP 是郵件發送協議,HTTP 是超文本傳輸協議。信息表達方式一般指語言、文字、圖形、圖像、聲音和形體動作等,多媒體技術和網絡技術是信息表達技術;網頁是由超文本標記語言 HTML 描述的,可以使用記事本進行編輯。
4.通過OCR軟件掃描期刊上的一篇文章后識別出文字,并用Word軟件編輯處理。下列說法不正確的是(　　)
A.OCR軟件可以識別的圖像格式有jpg、tif、bmp等
B.若掃描的分辨率太低,可能會影響OCR軟件的識別率
C.可以使用Word的批注功能給文章添加點評
D.Word軟件中完成編輯后,只要開啟“修訂”功能,就會顯示所有修改記錄
答案 D
解析 對于OCR軟件,掃描分辨率低、傾斜校正不到位、字體設置不正確等因素都會影響識別率;只有在修訂功能開啟狀態下進行的修改操作才會被顯示。
5.某Access數據表編輯界面如下圖所示,以下說法錯誤的是(　　)
/
A.當前打開的數據庫有3張數據表
B.工作表“消費賬單”中字段ID的值不會有重復
C.工作表“消費賬單”中“金額”字段的數據類型可以改成文本型
D.該數據庫文件無法實現網上共享
答案 D
解析 數據庫的優點就是可以共享,任何數據庫均可在網上共享。
6.某流程圖如圖所示:
/
若輸入k的值為9,最終i、s的值分別為(　　)
A.11 0 B.11 -11
C.9 0 D.9 -9
答案 B
解析 該流程圖的功能是對于每一個i的值(3,5,7,9),判斷若是3的倍數,則i加入s,不是3的倍數則讓s減去i。
7.下列關于多媒體作品及其創作的說法正確的是(　　)
A.AVI文件采用音頻、視頻信號交叉存儲,是一種無損壓縮視頻格式
B.使用Photoshop將BMP格式的圖片轉為JPEG格式后圖像更清晰
C.在創作之前對作品所需的資金、產生的經濟效益進行分析,屬于“應用需求分析”
D.多媒體作品中有圖像、聲音、文本等多種素材,這體現了多媒體技術的交互性
答案 C
解析 本題考查多媒體作品創作的相關基礎知識。AVI 是未經壓縮的視頻格式;BMP是未經壓縮的圖像格式,JPG 是有損壓縮的圖像格式,轉換后不可能變得更清晰。D選項的描述體現了多媒體技術的集成性。
8.下圖為在 Photoshop 中編輯“美食.psd”的部分界面,
/
以下說法正確的是(　　)
A.該文件的 BMP 圖像存儲量約為 2.62MB
B.將分辨率從 72 DPI 改為 120 DPI 后,像素總數量仍為 246*214
C.將“美食”圖層刪除,另存 BMP 格式后,像素數量會減少
D.該圖片每個像素的量化位數為 8 bit
答案 A
解析 狀態欄中的文字“文檔:2.63M/7.54M”,表示該文件的 BMP 圖像存儲量約為 2.62MB,PSD圖像存儲量約為7.54MB。像素大小是圖像的總像素數量,文檔大小是圖像打印尺寸。將分辨率從 72DPI 改為 120 DPI 后,像素總數量將變為2460*2140,但文檔大小不變,意味著打印的圖像更加清晰。圖層的多少不影響像素的數量。從標題欄可知圖像色彩模式是RGB/8,每個像素采用紅綠藍3原色表示,量化位數為 24 bit。
9.在Flash軟件中用補間動畫實現花朵變為花瓣飄落的效果,動畫起始幀的屬性面板如圖所示。下列說法正確的是(　　)
/
A.若動畫播放到2秒時暫停,聲音“music.mp3”也停止播放
B.花朵逐漸變為花瓣并減速飄落
C.當前幀不能直接添加動作腳本
D.當前幀中的花朵是形狀
答案 D
解析 聲音“music.mp3”的同步模式是事件,動畫暫停時聲音會繼續播放。動畫緩動值是負數,花朵逐漸變為花瓣并加速飄落。當前幀是動畫的起始幀,必定是關鍵幀,可以添加動作腳本。
10.一幅未經壓縮的1024×1600像素、24位真彩色的BMP圖像,存儲為JPG格式(其他參數不變)后其存儲容量為515 KB,則該圖像的壓縮比約為(　　)
A.6∶1 B.9∶1 C.36∶1 D.72∶1
答案 B
解析 bmp圖像容量=寬*高*量化位數=1024*1600*24/8/1024=4800 KB,壓縮比=不壓縮文件容量∶壓縮后容量=4800∶515≈9∶1。
11.有如下程序段:
Dim f(1 to 5) As Boolean
Dim i as Integer , j as Integer , k as Integer
For i=1 to 5
f(i)=False
Next i
i=1
Do While i<=4 and　not f(i)
For j=5 To i+1 Step -1
　If a(j)< a(j-1) Then
k=a(j): a(j)=a(j-1): a(j-1)=k
f(i)=True
　End If
Next j
i=i+1
Loop
數組元素 a(1)到 a(5)的值依次為“15,4,10,55,60”,經過該程序段“加工”后,數組f中元素值為 True的共有幾個(　　)
A.1 B.2 C.4 D.5
答案 B
解析 程序采用冒泡算法對數據進行升序排列,如果在第i遍排序中數據發生交換,則f(i)=true。根據所提供的數據,第1遍和第2遍有數據交換,所以f(1)和f(2)的值為True。
12.數組a為一組正整數,其奇數下標的數組元素是升序排序的奇數,偶數下標的數組元素是升序排序的偶數,依據對分查找思想,設計一個在數組a中查找數據Key的程序。實現該功能的VB程序段如下:
Key=Val(Text1.Text):i=1:j=10
Do While i<=j
m=Int((i+j)/2+0.5)
If key Mod 2+a(m) Mod 2=1 Then m=m-1
If a(m)=key Then
List1.AddItem ″找到了!″:Exit Do
ElseIf a(m)>key Then
j=m-2
Else
i=m+2
End If
Loop
If i>j Then List1.AddItem ″未找到此數″
如果數組元素a(1)到a(10)的數據依次是“1,4,5,6,11,10,23,16,25,20”,key的值為1,則執行上述程序段,變量m依次被賦值為(　　)
A.5 3 2 1 B.6 3 2 1 C.5 2 1 D.6 5 2 1
答案 D
解析 程序采用對分查找算法。循環體中條件key Mod 2+a(m) Mod 2=1表明key和a(m)中只有一個是奇數,現在key=1,則只有當a(m)是偶數時,執行m=m-1。
非選擇題部分
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
13.用Excel軟件對我國部分地區地震監測臺進行統計,界面如下圖所示,根據要求回答下列問題:
/
(1)區域G4:G20中的數據是利用G4單元格公式自動填充功能得到的。則G9單元格填充的公式是　。?
(2)為建立反映各地區地震監測總臺數的圖表,應選中建立圖表的數據區域為　　　　　　　。?
(3)將第(2)題完成的圖表復制到Word文檔中,后發現在修改Excel數據時,Word文檔中的圖表也會隨之發生變化,說明使用的粘貼方式是　　　(多選)。?
A.在Excel中復制圖表后按ctrl+v直接粘貼到Word文檔中
B.在Excel中復制圖表后選擇以圖片形式粘貼到Word文檔中
C.在Excel中復制圖表后,以嵌入工作簿的形式粘貼到Word文檔中
D.在Excel中復制圖表后,以鏈接數據的形式粘貼到Word文檔中
(4)將區域 B3:G20 的數據進行排序,主關鍵字為“國家級臺”,次關鍵字為“總臺數”,排序的次序均為降序,則排在第4名的地區是　　　　　　　　(填地區名)。?
答案 (1)F9/$G$21　(2)B3:B20,F3:F20　(3)AD　(4)甘肅
解析 (1)由編輯欄可知,G4單元格中的公式是=F4/$G$21,由G4單元格公式自動填充至G9,公式中絕對引用地址$G$21不會變,相對引用地址F4變為F9,所以G9單元格的公式是F9/$G$21。(2)要建立反映各地區地震監測總臺數的圖表,圖表中須包含各地區名稱以及總臺數的數據,所以圖表的數據區域應包含B3:B20,F3:F20。(3)略(4)排序的主關鍵字為“國家級臺”,次關鍵字為“總臺數”,則排序時,首先按“國家級臺”降序排列,如果“國家級臺”相同,再按總臺數降序排列。
14.小李利用所學的VB知識,編寫了一個簡單計算器:在文本框Text1中輸入一個加減算式(只包含數字和“+”、“-”符號,以“=”結束),點擊“計算”按鈕Command1,計算結果在標簽Label1上顯示。程序運行界面如下圖所示:
/
(1)要實現程序運行時,單擊文本框Text1即可將文本框清空,則應在　　　　(A.Command1_Click/B.Form_Load/C.Text1_Click)事件處理過程中添加語句Text1.text=″ ″。?
(2)實現上述功能的VB程序如下,請在劃線處填入合適的代碼。
Private Sub Command1_Click()
Dim s As String,ch As String,sum As Integer
Dim fh As Integer
s=Text1.Text:fh=1:p=0:sum=0
For i=1 To Len(s)
ch=Mid(s,i,1)
If ch>=″0″ And ch<=″9″ Then
p=　①　?
Else
sum=　②　?
p=0
If ch=″-″ Then
　　fh=-1
ElseIf ch=″+″ Then
　　fh=1
End If
End If
Next i
Label1.Caption=Str(sum)
End Sub
(3)若文本框Text1中輸入的內容為“12*10=”(不包括雙引號),單擊“計算”按鈕后,標簽Label1上將顯示:　　　　(A.120/B.22/C.0/D.程序出錯無法顯示)。?
答案 (1)C　(2)①P*10+val(ch)　②sum+fh*p　(3)B
解析 (1)略(2)由最后顯示語句Label1.Caption=Str(sum)可知,變量sum存放算式的結果。變量p存放一個加數,其值由每一位數字乘以權值累加所得,所以①處填P*10+val(ch)。當取得一個完整的加數后,再把p值加入sum中,加入時考慮p值的正負情況,正負情況存在變量fh中,所以②處填sum+fh*p。(3)由于算法中只對加號和減號進行處理,*號不作處理,變量fh的值不變,仍然是1,所以會把乘法當作加法處理。
15.設計師使用Photoshop和Flash軟件制作一淘寶店宣傳動畫,請回答下列問題。
(1)他首先在Photoshop中處理圖片,其圖層面板如圖所示,以下說法正確的是　　　　。?
/
A.某些文字圖層中出嘆號警示,表明系統缺少字體
B.可以使用油漆桶工具把“背景”圖層中的白色區域填充為綠色
C.刪除Orange圖層時,“100%新鮮”圖層也將被刪除
D.使用油漆桶工具修改“orange”圖層的文字的顏色
E.給“橙子”圖層添加外發光樣式
F.對“100%新鮮”圖層設置濾鏡前需先柵格化
(2)接下來,他在Flash軟件中制作宣傳動畫,其時間軸界面如下圖所示,
/
title1 圖層動畫設計為文字內容從完全透明到完全顯示,由此可知該圖層第　　　　　幀(填幀數)的alpha屬性值為100%。?
(3)測試影片時發現title1和title2 的動畫同時出現在畫面上,現需要將動畫效果調整為待 title1動畫結束后title2的動畫再開始播放,調整方法為　　　　　　　　　　　　　　　。?
(4)orange 圖層動畫效果設計為橙子自舞臺外側減速向左進入到舞臺內,則在屬性面板中可以將緩動值設置為　　　　　　　　　　　　　(選填數字:-100/0/100)。?
(5)設計師將動畫設計為用戶點擊“5 折嘗鮮中……”按鈕時自動跳轉到自己的淘寶網店鋪(域名為:orange.taobao.com),則他可在該按鈕上設置的動作腳本為　　　　　　　　　　　　　　　　。?
答案 (1)ABEF　(2)25　(3)將title2圖層第 10-25幀整體后移15幀　(4)100　(5)on(release){getURL(“http://orange.toaobao.com”);}
解析 (1)圖中Orange圖層與100%新鮮圖層有鏈接關系,大小與位置相互關聯,但刪除Orange圖層時,鏈接圖層不受影響,移動圖層層次也不受影響。油漆桶工具只能填充圖像,不能填充文本。(2)本題考查時間軸補間的解讀,從圖上可以看出 title1 圖層的補間動畫從第10 幀到第25幀。(3)略。(4)動畫補間的默認緩動值為 0,表示勻速運動;緩動值為正數,表示減速運動;緩動值為負數,表示加速運動。(5)按鈕腳本的基本格式 on(鼠標事件){要執行的動作}。鏈接命令需使用getURL(“URL”);語句,寫網址時必須填寫完整的URL。
16.有一組正整數,要求僅對其中的奇數進行升序排序。排序后在列表框List2中也僅顯示奇數部分數據,結果如圖所示。
/
實現上述功能的VB代碼如下,但加框處有錯,請改正。
Const n=10
Dim a(1 To n) As Integer
Private Sub Command1_Click()
Dim t As Integer,i As Integer,j As Integer,m As Integer
Dim tmp As Integer
'讀取一組正整數,存儲在數組a中,并顯示在列表框List1,代碼略
i=1
Do While i<=n
For j=n To i+1 Step-1
If a(j) Mod 2=1 Then
　　If a(j)　　　　tmp=a(j):a(j)=a(j-1):a(j-1)=tmp
　　　　t=t+1
　　End If
End If
Next j
If a(j) Mod 2=0 Then m=m+1 '②
i=i+1
Loop
For i=1 to m
List2.AddItem Str(a(i))
Next i
List2.AddItem ″一共交換了″ & t & ″次″
End Sub
答案 ①a(j)解析 ①處所在循環是通過上浮式冒泡排序,把較小的奇數a(j)交換到前面,或者是當a(j-1)為偶數時,a(j)也應該交換到前面。②處是在第i遍排序中,如果冒泡到a(i)中的數是奇數,則奇數個數m加1。
17.統計近100期體育彩票“大樂透”中各數字的最大遺漏值。每期“大樂透”彩票號碼由7組2位數字組成,數字范圍是01到35,如“09112227300911”。最大遺漏值是指某號碼連續未出現的最大期數。例如,號碼07在第3期、第15期、第30期、第53期、第78期出現,則其最大遺漏值是24。
現用VB設計統計程序,啟動程序時,從數據庫載入近100期體育彩票中獎號碼,單擊“最大遺漏值”按鈕,在列表框List1中顯示各數字的“最大遺漏值”。程序運行圖如下所示,
/
(1)實現統計功能的VB程序如下,請在劃線處填入正確的語句。
Private Sub Command2_Click()
Dim max As Integer, m As Integer, flag As Boolean
Dim i As Integer, j As Integer, k As Integer
Dim a(j) As Integer '存儲 j 期中獎號碼
For i=1 To 35
　max=0:m=0
　For j=1 To 100
　flag=False
　For k=1 To 7
　　　x=①　　　?
　　　If x=i Then flag=True
　Next k
　If flag=False Then m=②　　　　?
　If m>max Then max=m
　If flag Then m=③　　　　　　　?
　Next j
　List1.AddItem Str(i)+ ″　　″ +Str(max)
Next i
End Sub
答案 ①Val(Mid(a(j),2*k-1, 2))　②m+1　③0
解析 程序中,變量i枚舉數字1到35,變量j枚舉100期彩票,變量k枚舉一期中獎號碼中的7組數字。①處循環的功能是尋找j期中獎號碼中是否有號碼i,若有,則flag=true,變量x是要取出j期中獎號碼中的第k個數字x,如果x=i,表示找到號碼i,則flag=true。②處表示如果沒找到號碼i,則遺漏值m的值加1。③處表示如果找到號碼i,則m重新計數。

展開更多......

收起↑