當(dāng)前位置： 2018-2019學(xué)年浙江省溫州市十五校聯(lián)合體高二（上）期中信息技術(shù)試卷> 試題詳情

小王用VB編寫(xiě)一個(gè)自動(dòng)統(tǒng)計(jì)英文字母和單詞個(gè)數(shù)的程序。功能如下：在文本框Text1中輸入任意的英文句子，單擊“統(tǒng)計(jì)”命令按鈕Command1，程序自動(dòng)統(tǒng)計(jì)出每個(gè)字母出現(xiàn)的頻率，并將其輸出到列表框List1，且將出現(xiàn)次數(shù)最多的字母輸出在標(biāo)簽Label1中，另外將單詞個(gè)數(shù)在標(biāo)簽label2中輸出。程序界面如圖所示，實(shí)現(xiàn)上述功能的VB程序如下。請(qǐng)回答以下問(wèn)題：
（1）請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Command1_Click （　?。?br />Dim a（65To 122）As Integer
Dim i As Integer,ch As String,count As Integer
Dim Max As Integer,Maxi As Integer,flag As Boolean
List1．Clear
flag=False
count=0
s=Text1．Text
For i=1To Len（s）
ch=Mid（s,i,1）
If ch＞=“a“And ch＜=“z“Or ch＞=“A“And ch＜=“Z“Then
a（Asc（ch））=①
a（Asc（ch））+1
a（Asc（ch））+1

If flag=False Then
count=count+1
flag=True
End If
Else
②
flag=False
flag=False

End If
Next i
Max=0：Maxi=0
For i=65To 122’A的ASCII碼值為65，a的ASCII碼值為97
If a（i）＞0Then
List1．AddItem Chr（i）+“：“+Str（a（i））
End If[
If a（i）＞Max Then
Max=a（i）
Maxi=i
End If
Next i
Label1．Caption=“頻率最高字母：“+③
Chr（Maxi）
Chr（Maxi）

Label2．Caption=“共有單詞數(shù)：“+Str（count）+“個(gè)“
End Sub
（2）從代碼可知，當(dāng)出現(xiàn)兩個(gè)以上的字母次數(shù)最高時(shí)（例如字母a和d都出現(xiàn)4次，且為最高次數(shù)），則程序最終輸出的是
A
A
（單選，填寫(xiě)字母：A．排在前面的第一個(gè)頻率最高字母/B．中間的某個(gè)頻率最高字母/C．排在最后的一個(gè)頻率最高字母/D．無(wú)法確定）。

【考點(diǎn)】編輯事件處理過(guò)程的代碼．

【答案】a（Asc（ch））+1；flag=False；Chr（Maxi）；A

【解答】

【點(diǎn)評(píng)】

聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書(shū)面同意，不得復(fù)制發(fā)布。

當(dāng)前模式為游客模式，立即登錄查看試卷全部?jī)?nèi)容及下載

發(fā)布：2024/4/20 14:35:0組卷：3引用：1難度：0.4

相似題

1．小華開(kāi)發(fā)了一個(gè)自動(dòng)改卷系統(tǒng)，但是由于科目不同，沒(méi)有固定的題號(hào)模板，于是小華又編寫(xiě)了python程序，能根據(jù)試卷答案自動(dòng)輸出題號(hào)。如圖1為答案模板文件，小華在模板文件中錄入答案后保存為“卷3.txt”，如圖2所示，每一行是一題或者一題中的一小題的答案，題號(hào)之間沒(méi)有跳躍。例如：圖2中【1】和【5】之間有4行，A、B、C、D為第1到4題的答案。程序運(yùn)行結(jié)果如圖3所示。
?
（1）實(shí)現(xiàn)上述功能的Python程序如下，若刪除圖 13-2 最后一行（【7】所在的行），對(duì)程序運(yùn)行結(jié)果

影響（填：有/沒(méi)有）。
（2）請(qǐng)?jiān)趧澗€處填入合適的代碼。
?
發(fā)布：2024/11/13 8:0:1組卷：0引用：1難度：0.3
解析
2．（郊游活動(dòng)）有 n 名同學(xué)參加學(xué)校組織的郊游活動(dòng)，已知學(xué)校提供給這 n 名同學(xué)的郊游總經(jīng)費(fèi)為 cnt 元，與此同時(shí)每位同學(xué)都自帶了部分錢(qián)。為了方便郊游，活動(dòng)地點(diǎn)提供 m（n＜=m＜=100）輛自行車(chē)供人租用，租用每輛自行車(chē)也需要花費(fèi)錢(qián)，每位同學(xué)可以使用自己攜帶的錢(qián)或者學(xué)校的郊游經(jīng)費(fèi)，為了方便賬務(wù)管理，每位同學(xué)只能為自己租用自行車(chē)，且不會(huì)借錢(qián)給他人，他們想知道最多有多少位同學(xué)能夠租用到自行車(chē)。
租車(chē)原則是首先考慮自帶經(jīng)費(fèi)少的部分同學(xué)優(yōu)先租相對(duì)花費(fèi)少的自行車(chē)，盡量少花學(xué)校經(jīng)費(fèi)以達(dá)到最多同學(xué)租車(chē)的結(jié)果。比如學(xué)生帶的錢(qián)為 9，3，6，7，5，租車(chē)的錢(qián)分別需要 15，8，12，6，9，11，如果 5 個(gè)人都能租車(chē)，至少需要學(xué)校提供經(jīng)費(fèi)為（6-3）+（8-5）+（9-6）+（11-7）+（12-9）=16，如果學(xué)校經(jīng)費(fèi)只有 10 元，則自帶錢(qián)最少的同學(xué)不租車(chē)，這時(shí)所需學(xué)校經(jīng)費(fèi)為（6-5）+（8-6）+（9-7）+（11-9）=7。計(jì)算過(guò)程中采用二分查找法來(lái)判斷租用自行車(chē)的人數(shù)能否達(dá)到最大值。
（1）若 7 位學(xué)生自帶經(jīng)費(fèi)分別為 5，17，15，12，10，9，14，自行車(chē)租車(chē)費(fèi)用分別為 27，14，27，25，17，18，23，21，學(xué)校提供經(jīng)費(fèi)為 25 元，則最多有

位同學(xué)能夠租用到自行車(chē)。
（2）VB程序代碼如下，請(qǐng)?jiān)跈M線處填入合適的代碼。

發(fā)布：2024/11/14 11:30:2組卷：0引用：1難度：0.3
解析
3．分解質(zhì)因數(shù)是指一個(gè)整數(shù)可以寫(xiě)成幾個(gè)質(zhì)數(shù)相乘的形式?，F(xiàn)有如下Python 程序段實(shí)現(xiàn)對(duì)一個(gè)整數(shù)（可以為負(fù)整數(shù)）分解質(zhì)因數(shù)，如輸入正整數(shù)15，輸出結(jié)果為：15=3*5，輸入負(fù)整數(shù)-4，輸出結(jié)果為：-4=-1*2*2。
（1）請(qǐng)?jiān)跈M線處填入合適的代碼。

（2）當(dāng)輸入整數(shù)-40時(shí)，輸出的結(jié)果為

。
發(fā)布：2024/11/15 20:0:1組卷：4引用：1難度：0.4
解析

把好題分享給你的好友吧~~