小明的支付宝账号密码忘记了,但他还零星记得有关于密码的一些信息:
①密码是八位数字,前两位为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.以下问题,适合用枚举法解决的是( )
发布:2024/11/8 11:30:1组卷:2引用:1难度:0.8 -
2.若一个三位数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 -
3.如果一个4位数恰好等于它的各位数字的4次方和,则这个数被称为“玫瑰花”数。例如1634就是一个玫瑰花数:1634=14+64+34+44。如果要求出所有的玫瑰花数,下列算法合适的是( )
发布:2024/11/16 22:30:5组卷:7引用:2难度:0.5