首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是:求出所有的三位数,其各位数字的立方和等于该数。如: 153=13+53+33。 Option Explicit Private Sub Form_Click() Dim x1 As Integer,x2 As Integ
下面程序的功能是:求出所有的三位数,其各位数字的立方和等于该数。如: 153=13+53+33。 Option Explicit Private Sub Form_Click() Dim x1 As Integer,x2 As Integ
admin
2009-02-13
57
问题
下面程序的功能是:求出所有的三位数,其各位数字的立方和等于该数。如: 153=13+53+33。
Option Explicit
Private Sub Form_Click()
Dim x1 As Integer,x2 As Integer,x3 As Integer
【 】
For i=100 To 999
x=i
x1=【 】个位数字
x2=x\10 Mod 10
x3=x\100
If【 】Then
Print i
End If
Next i
End Sub
选项
答案
Dim x As Integer,i As Integer , x Mod 10 , x1^3+x2^3+x3^3=i
解析
本程序中使用了“Option Explicit”语句,因此程序中使用的所有变量都必须先定义,故[9]处应填变量定义语句“Dim x As Integer,i As Integer”。要判断x是否为水仙花数,可首先把x的各位数字分离出来,[10]处显然是分离出个位数字,应填“x Mod 10”。然后判断各位数字的立方和是否与i相等,如果相等,则是水仙花数,所以[11]处应填“x1^3+x2^3+x3^3=i”。
转载请注明原文地址:https://kaotiyun.com/show/Nn1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
分支语句分为()。
执行下列程序时,会产生什么异常publicclassTest{publicstaticvoidmain(Stringargs[])(intd=101;intb=220;
抛出异常、生成异常对象都通过下列哪个语句实现?()
下列语句输出结果为()。publicclasstest\{publicstaticvoidmain(Stringargs[]){Strings1=newString("How");
下列哪个选项可以正确用以表示八进制值8?()
在HTML页中可包含Applet,关于Applet的参数,以下说法错误的是()。
创建一个10行40列的文本区域tal的正确语句是【】。
在程序中,给出两个整数4和5,计算他们的和,并在屏幕上显示出来。请将程序补充完整。注意:请勿修改main()主方法和其他已有语句内容,仅在横线处填入适当语句。______Add{privateinta;
赋值表达式是由位于赋值运算符左边的变量和右边的【】组成。
随机试题
下列哪项不是缺铁性贫血临床表现
肠道杆菌中,重要的荚膜或包膜抗原是
蛋白质的功能取决于以一级结构为基础的蛋白质的空间构象。()
杨某生产假冒避孕药品,其成份为面粉和白糖的混合物,货值金额达15万多元,尚未销售即被查获。关于杨某的行为,下列哪一选项是正确的?(2010年卷二15题,单选)
1.背景由某企业承建某多功能现代化商务综合大厦,地上46层,地下3层,全现浇钢筋混凝土框架一剪力墙结构,主体结构采用泵送混凝土等新技术。建筑物周边都十分接近规划用地红线,周边建筑及地下管线对因工程基坑开挖引起地层变形移动影响十分敏感,且基坑北面邻近地铁。
甲公司系增值税一般纳税人,2014年3月购入原材料1000公斤,收到的增值税专用发票注明价款5000万元、增值税税额850万元;另发生运费,取得运输业增值税专用发票,发票上注明不含税价款10万元(增值税税率为11%)、包装费3万元、途中保险费用3万元。原材
2013年11月15日,新版的《世界反兴奋剂条例》,制定了更加严格的处罚措施。与旧版相比,新条例从重处罚逃避检查、破坏样品和使用非特定违禁物品等行为,运动员初次违规禁赛期()。
费边社
简述西周时期婚姻六礼的主要内容。
[*]
最新回复
(
0
)