2018-2019學(xué)年浙江省金華市東陽(yáng)中學(xué)高二（下）段考信息技術(shù)試卷（3月份）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分．每小題給出的四個(gè)選項(xiàng)中，只有一個(gè)符合題目要求）
-
1．下列有關(guān)信息的說(shuō)法中，正確的是（ ?。?/h2>
組卷：17引用：4難度：0.4 -
2．下列應(yīng)用中，體現(xiàn)人工智能技術(shù)的有（ ?。?br />①UPS（不間斷電源）在停電后會(huì)自動(dòng)切換為后備電源
②某款產(chǎn)品能實(shí)現(xiàn)對(duì)全屋電器的聲控，解放雙手
③手機(jī)通過(guò)安裝某APP能實(shí)現(xiàn)對(duì)各種電器的遙控
④某APP根據(jù)拍攝的作業(yè)照片給出相應(yīng)的解題信息
⑤公安部門(mén)通過(guò)“天眼”系統(tǒng)快速查找、定位到犯罪嫌疑人組卷：29引用：5難度：0.7 -
3．使用Word軟件編輯文檔，部分界面如圖所示。下列說(shuō)法正確的是（ ?。?br />
組卷：23引用：3難度：0.5 -
4．使用Access軟件進(jìn)行學(xué)生信息管理。已有數(shù)據(jù)表視圖如圖a所示，部分?jǐn)?shù)據(jù)存儲(chǔ)在Excel表中如圖b所示，下列說(shuō)法正確的是（ ）
組卷：35引用：3難度：0.2 -
5．某算法的部分流程圖如圖所示，若輸入m的值是5，執(zhí)行這部分流程后，變量s和i的值是（ ?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/201904/115/02b8d0b7.png" style="vertical-align:middle" />
組卷：8引用：3難度：0.4
二、非選擇題（本大題共5小題，其中第13小題6分，第14小題5分，第15小題5分，第16小題10分，共26分）
-
16．小明基于選擇排序算法編寫(xiě)了一個(gè)VB程序，功能如下：某班有50個(gè)學(xué)生，從中選擇10個(gè)身高最高的同學(xué)，要求被選的任何兩個(gè)人不能身高一樣（所給的數(shù)據(jù)保證能選10個(gè)）。
實(shí)現(xiàn)上述功能的VB程序如下，但加框處代碼有錯(cuò)，請(qǐng)改正。
Const n=50
Dim d（0 To n） As single,name（1 to n） as string
'讀入50個(gè)學(xué)生的身高，依次存入d（1）…d（50），最高身高小于2，姓名存入name（1）…name（50）
'代碼略
Private Sub Command1_Click （ ?。?br />Dim i As Integer,j As Integer,temp As single,k As Integer,r as string
d（0）=2
For i=1 To 10
For j=i To n
If d（j）＜d（i-1）Then
If
Then
k=j
End If
End If
Next j
If k＜＞i Then
temp=d（k）：d（k）=d（i）：d（i）=temp
r=name（k）：name（k）=name（i）：name（i）=r
End If
Next i
For i=1 To 10‘輸出被選的10個(gè)人的名字和身高。
List2．AddItem name（i） & d（i）
Next i
End Sub組卷：10引用：2難度：0.4 -
17．酒店房間管理：酒店房間（房間數(shù)小于10000）編號(hào)按1、2、3…連續(xù)編號(hào)，老板對(duì)于沒(méi)有出租的房子使用如下的方法來(lái)登記管理。連續(xù)的空房間，登記第一間的編號(hào)和連續(xù)的空房間數(shù)，比如空房間1，2，6，7，8，10，則登記3條記錄，分別為（1 2），（6 3），（10 1），某旅客退房了，需要把這房子也登記上去，有四種情況需要處理：
1）上靠，例如退的房間號(hào)為3，則原來(lái)登記的3條記錄變成（ 1 3），（6 3），（10 1）；
2）下靠，例如退的房間號(hào)為5，則原來(lái)登記的3條記錄變成（1 2），（ 5 4），（10 1）；
3）上下不靠，例如退的房間號(hào)為4，則登記的記錄數(shù)變成4條（1 2），（4 1），（6 3），（10 1）；
4）上下靠，例如退的房間號(hào)為9，則登記的記錄數(shù)變成2條（1，2），（6，5）；
小王依據(jù)上述描述設(shè)計(jì)了如下VB程序。請(qǐng)回答下列問(wèn)題：
（1）當(dāng)?shù)怯浀挠涗浻?條，分別為（1，4），（6，2），（10，3），現(xiàn)在某旅客退掉5號(hào)房間，則登記的記錄變成
（2）請(qǐng)?jiān)跈M線處填入合適的代碼。
Const n=5000
Dim a（0 To n） As Integer'a（i）保存第i條記錄的開(kāi)始房間號(hào)
Dim b（0 To n） As Integer'b（i）保存第i條記錄的房間數(shù)
Dim c As Integer,k As Integer,sp As Integer'k為原始記錄數(shù)
'讀取原始k條記錄的數(shù)據(jù)，依次存入a（1），b（1），a（2），b（2）…a（k），b（k），代碼略
'為了程序處理方便，虛設(shè)了下面2條記錄
a（0）=0：b（0）=0：sp=k+1：a（sp）=10000：b（sp）=0
Private Sub Command1_Click （ ?。?br />Dim i As Integer
c=Val（Text1．Text）'c為退掉的房間號(hào)
i=1
Do While a（i）＜c'查找房間c,應(yīng)該登記在某位置
i=i+1
Loop
i=i-1
'下面為處理退房登記問(wèn)題
If a（i）+b（i）=c Then
If ①Then'第4種情況，上下靠
b（i）=b（i）+1+b（i+1）
For j=i+1 To sp-1
a（j）=a（j+1）：b（j）=b（j+1）
Next j
sp=sp-1
Else'第1種情況，上靠
b（i）=b（i）+1
End If
ElseIf c+1=a（i+1）Then'第2種情況，下靠
a（i+1）=c：b（i+1）=b（i+1）+1
Else'第3種情況，上下不靠
For j=②
a（j）=a（j-1）：b（j）=b（j-1）
Next j
a（i+1）=c：b（i+1）=1：sp=sp+1
End If
‘下面為輸出登記的記錄，不包括虛設(shè)的兩條記錄
For i=1 to ③
List3．AddItem“第“& Str（i） &“記錄（“& Str（a（i）） &“，“& Str（b（i）） &“）“
Next i
End Sub組卷：9引用：1難度：0.5