2017-2018學(xué)年浙江省嘉興市高二（下）期末信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分．在每小題給出的四個(gè)選項(xiàng)中，只有一個(gè)符合題目要求．）
-
1．下列有關(guān)信息的說(shuō)法，正確的是（ ）
組卷：2引用：1難度：0.5 -
2．下列說(shuō)法中，不正確的是（ ?。?/h2>
組卷：1引用：1難度：0.5 -
3．使用UltraEdit軟件觀察字符串“2018我來(lái)啦！”的內(nèi)碼，部分界面如圖所示。下列說(shuō)法正確的是（ ?。?br />
組卷：2引用：1難度：0.5 -
4．使用Access軟件打開(kāi)數(shù)據(jù)庫(kù)，部分界面如圖所示。下列說(shuō)法不正確的是（ ）
組卷：0引用：1難度：0.5 -
5．某算法流程圖如圖所示。執(zhí)行該流程圖后，s和i的值分別為（ ?。?/h2>組卷：0引用：1難度：0.4
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分．）
-
16．若一個(gè)數(shù)（首位不為零）從左向右讀與從右向左讀都是一樣，我們就將其稱(chēng)之為回文數(shù)。給定一個(gè)十進(jìn)制數(shù)n,構(gòu)建一個(gè)回文數(shù)的過(guò)程如下：求n與n的逆序數(shù)（從右向左重新排列）之和，如果和為回文數(shù)則停止，否則將和視為n,繼續(xù)按前面過(guò)程求和，直到找到回文數(shù)。例如，對(duì)于十進(jìn)制數(shù)78：
STEP1：78+87=165
STEP2：165+561=726
STEP3：726+627=1353
STEP4：1353+3531=4884
實(shí)現(xiàn)上述功能的VB程序如下，但加框處代碼有錯(cuò)，請(qǐng)改正。
Private Function fanxu（a As String）As String
Dim i As Integer
For i=Len（a）To 1 Step-1
fanxu=fanxu&Mid（a,i,1）
Nexti
End Function
Private Function huiwen（b As String）As Boolean
Dim i As Integer,xAs String,y As String
huiwen=False
For i=1 To Len（b）
x=Mid（b,i,1）
y=
'①
If x＜＞y Then Exit For
Next i
If i＞Len（b）Then huiwen=True
End Function
Private Sub Command1_Click （ ）
Dims As Long,t As Long,i As Integer
List1．Clears=Val（Text1．Text）
Fori=1To 10
'②
List1．AddTtem Str（s）+″+″+fanxu（Str（s））+″=″+Str（t）
s=t
If huiwen（Trim（t））Then
Label1．Caption=″經(jīng)過(guò)″&Str（i）&″步得到回文數(shù)！″
Exit For
End If
Next i
Ifi＞10Then Label1．Caption=″經(jīng)過(guò)10步運(yùn)算不能得到回文數(shù)?！?br />End Sub組卷：1引用：1難度：0.6 -
17．在一次晚會(huì)上，一位魔術(shù)師掏出一疊撲克牌，取出其中13張黑桃，預(yù)先洗好后，把牌面朝下，對(duì)觀眾說(shuō)：“我不看牌，只數(shù)一數(shù)就能知道每張牌是什么？”魔術(shù)師口中念1，將第一張牌翻過(guò)來(lái)看正好是A；魔術(shù)師將黑桃A放在桌上，繼續(xù)數(shù)手里的余牌，第二次數(shù)1，2，將第一張牌放到這疊牌的下面，將第二張牌翻開(kāi)，正好是黑桃2．也將它放在桌子上。第三次數(shù)1，2，3，前面兩張牌放在這疊牌的下面，取出第三張牌，正好是黑桃3，這樣依次將13張牌翻出，準(zhǔn)確無(wú)誤。
小明依據(jù)上述描述設(shè)計(jì)了如下VB程序，計(jì)算出魔術(shù)師手中牌的原始順序，運(yùn)行結(jié)果如圖所示。請(qǐng)回答下列問(wèn)題：
（1）完善程序。請(qǐng)?jiān)谝韵鲁绦虼a段中的3處劃線(xiàn)位置填入合適的代碼。
Private Sub Form_Load （ ?。?br />Dim i As Integer,j As Integer,n As Integer
Dim a（1 To 13）As Integer
Dim flag As Boolean
For j=1To 13
a（j）=0
Nextj
i=1：j=0：n=0
flag=True
DoWhilei＜=13
DoWhile flag
j=j+1
If j＞13 Then j=1
If a（j）=0 Then ①
If n=i Then
②
n=0
flag=False
End If
Loop
③
i=i+1
Loop
Label1．Caption=″原始牌序是：″
For i=1 To 13
Text1．Text=Text1．Text+Str（a（i））'輸出撲克牌原有順序
Next i
End Sub
（2）如果這13張黑桃撲克牌原來(lái)是有序的（即最上面為黑桃A，依次為黑桃2、黑桃3…），那么按照上述魔術(shù)師的取牌方法，取到的第5張牌是。組卷：1引用：1難度：0.4