維吉尼亞密碼。如圖所示,分別用行和列表示待加密的字符(明文)和當(dāng)前字符的密鑰,行和列的交叉點(diǎn)的字符即為加密后的結(jié)果(密文)。在加密時(shí),密文與明文的字母大小寫形式保持一致,如:明文字母為大寫,則加密后的密文字母也為大寫;當(dāng)密鑰長(zhǎng)度不足時(shí)重復(fù)使用密鑰。
例如:當(dāng)明文M=HelloWorld,密鑰K=abc時(shí),密文C=HfnlpYosnd.運(yùn)算過(guò)程如下所示:
明文:HelloWorld
密鑰:abcabcabca
密文:HfnlpYosnd
依據(jù)上述算法描述設(shè)計(jì)了如下VB程序。請(qǐng)回答下列問(wèn)題:
(1)若明文是Jia,密鑰是Pass,則輸出的密文是:YisYis
(2)請(qǐng)?jiān)跈M線處填上合適的代碼
Const MIN_ASC=65
Function X2D(x As String) As String
Dim s As String,zf As String,i As Integer
s=““
For i=1To Len(x)
zf=Mid(x,i,1)
If zf>=“a“And zf<=“z“Then
s=s+①Chr(Asc(zf)-32)Chr(Asc(zf)-32)
Else
s=s+zf
End If
Next i
X2D=s
End Function
Private Sub Command1_Click ( ?。?br />Dim M As String,K As String,C As String,flag As Boolean
Dim i As Integer,t As Integer,ch As Integer,pos As Integer,j As Integer
M=Text1.Text'明文
K=Text2.Text'密鑰
t=Len(K)
K=X2D(K)
C=““
For i=1To Len(M)
ch=Asc(Mid(M,i,1))
flag=False
If ch>=97And ch<=122Then ch=ch-32:flag=True
pos=②iModtiModt'密鑰的字符位置值
If pos=0Then pos=t
j=Asc(Mid(K,pos,1))'密鑰字符的ASCII值
ch=ch-MIN_ASC
j=j-MIN_ASC
ch=③(ch+j)Mod26(ch+j)Mod26
ch=ch+MIN_ASC
If flag Then ch=ch+32'設(shè)置字母的大小寫形式
C=C & Chr(ch)
Next i
Text3.Text=C
End Sub
【考點(diǎn)】編輯事件處理過(guò)程的代碼.
【答案】Yis;Chr(Asc(zf)-32);iModt;(ch+j)Mod26
【解答】
【點(diǎn)評(píng)】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/6/27 10:35:59組卷:0引用:1難度:0.3
相似題
-
1.學(xué)校舉辦了“語(yǔ)文作文現(xiàn)場(chǎng)賽”,參賽同學(xué)成績(jī)存儲(chǔ)在文本文件“gra.jye.ai”中,如左圖所示(每一行記錄一位同學(xué)的姓名和成績(jī),以“:”分隔)。陳老師利用Python程序?qū)ψ魑某煽?jī)進(jìn)行處理,統(tǒng)計(jì)出各個(gè)分?jǐn)?shù)等級(jí)的人數(shù),并輸出結(jié)果。程序運(yùn)行界面如右圖所示。
實(shí)現(xiàn)上述功能的Python程序如下,請(qǐng)?jiān)趧澗€處填入合適的代碼。發(fā)布:2024/12/17 2:0:1組卷:6引用:2難度:0.3 -
2.有如下Python程序段:
執(zhí)行該程序段,輸入字符串“abcdefg”,則輸出的結(jié)果是( ?。?/h2>發(fā)布:2024/12/20 6:30:1組卷:2引用:3難度:0.4 -
3.試題描述的內(nèi)容:
一個(gè)單窗體VB程序的運(yùn)行界面如圖所示。下列說(shuō)法正確的是( ?。?br />(1)窗體內(nèi)有1個(gè)按鈕
(2)窗體內(nèi)有2個(gè)文本框
(3)窗體內(nèi)有3個(gè)標(biāo)簽
(4)該窗體的標(biāo)題(Caption)屬性值是“加法計(jì)算器”發(fā)布:2024/12/20 20:0:2組卷:1引用:1難度:0.6
把好題分享給你的好友吧~~