小明的支付寶賬號密碼忘記了,但他還零星記得有關于密碼的一些信息:
①密碼是八位數字,前兩位為19
②最后兩位數字是91
③能被77和133整除
程序界面如圖1所示,單擊“找回密碼”按鈕(Command1)后,可能的密碼顯示在列表框List1中。

解決此問題的相應的程序如下:
Private Sub Command1_Click ( )
Dim i As Long,s As Long
For i=0 To 9999
s=①Val(“19“+str(Format(“i“,0000))+“91“)Val(“19“+str(Format(“i“,0000))+“91“)'s表示該八位數密碼
If ②s mod 77=0 And s mod 33=0s mod 77=0 And s mod 33=0Then'符合密碼的條件,s能被77和133整除
List1.AddItem Str(s)
End If
Next i
End Sub
(1)在應用程序界面設計時,添加“List1”對象用于顯示可能的密碼,應使用圖2所示的“控件工具箱”中的 ②②(填寫相應的編號)。
(2)將窗體Form1上顯示的文本“Form1”改為“尋找密碼”,可在其屬性窗口中將屬性 CaptionCaption的屬性值修改為“尋找密碼”。
(3)解決此問題的算法是 枚舉算法枚舉算法。(填:枚舉算法/解析算法/查找算法)
(4)在程序①和②下橫線處,填入適當的語句或表達式,把程序補充完整:
程序中①下橫線處應填入 s=Val(“19“+str(Format(“i“,0000))+“91“)s=Val(“19“+str(Format(“i“,0000))+“91“)
程序中②下橫線處應填入 s mod 77=0 And s mod 33=0s mod 77=0 And s mod 33=0
【考點】枚舉算法及程序實現.
【答案】Val(“19“+str(Format(“i“,0000))+“91“);s mod 77=0 And s mod 33=0;②;Caption;枚舉算法;s=Val(“19“+str(Format(“i“,0000))+“91“);s mod 77=0 And s mod 33=0
【解答】
【點評】
聲明:本試題解析著作權屬菁優網所有,未經書面同意,不得復制發布。
發布:2024/6/27 10:35:59組卷:18引用:1難度:0.4
相似題
-
1.以下問題,適合用枚舉法解決的是( )
A.已知圓的半徑和圓的面積公式求圓的面積 B.利用求和公式計算1+3+5+7+…+100的和 C.已知三角形三邊長度,通過海倫公式求出三角形的面積 D.中國科學家們通過對4萬多種抗瘧疾的化合物和中草藥的篩選,最終屠呦呦發現青蒿素具有良好抗瘧效果(由此屠呦呦獲得2015年諾貝爾獎) 發布:2024/11/8 11:30:1組卷:2引用:1難度:0.8 -
2.如果一個4位數恰好等于它的各位數字的4次方和,則這個數被稱為“玫瑰花”數。例如1634就是一個玫瑰花數:1634=14+64+34+44。如果要求出所有的玫瑰花數,下列算法合適的是( )
A.查找法 B.解析法 C.窮舉法 D.排序法 發布:2024/11/16 22:30:5組卷:7引用:2難度:0.5 -
3.若一個三位數abc,滿足abc=a3+b3+c3,則稱abc為水仙花數。如三位數153滿足13+53+33=1+125+27=153,則153是水仙花數。請把所有滿足條件的水仙花數輸出。
(1)分析問題。由題意可知,三位數的范圍是100~999,我們可以讓計算機一一檢查每一個三位數,輸出其中的水仙花數。設百位數字、十位數字、個位數字分別是a,b,c(0<a≤9,0≤b≤9,0≤c≤9),這個三位數就可以表示為100×a+10×b+c,如果它正好等于各位數字的立方和,那么它就是水仙花數。
(2)設計算法。
①令a從1~9窮舉;
②令b從0~9窮舉;
③令c從0~9窮舉;
④如果100×a+10×b+c和a3+b3+c3相等,那么就把它輸出。
⑤轉步驟③,重復執行③④⑤,直到c窮舉完畢;
⑥轉步驟②,重復執行②③④⑤⑥,直到b窮舉完畢;
⑦轉步驟①,重復執行①②③④⑤⑥⑦,直到a窮舉完畢;
⑧跳出循環,結束。
(3)編寫程序。
(4)調試程序。發布:2024/8/7 8:0:9組卷:1引用:0難度:0.4