首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下程序的功能是单击Command1按钮,将输出1~100之间的所有同构数。同构数是指该数出现在它的平方数的右边,如52=25、252=625。 Private Sub Command1_Click() Dim i As Integer,
以下程序的功能是单击Command1按钮,将输出1~100之间的所有同构数。同构数是指该数出现在它的平方数的右边,如52=25、252=625。 Private Sub Command1_Click() Dim i As Integer,
admin
2009-02-13
23
问题
以下程序的功能是单击Command1按钮,将输出1~100之间的所有同构数。同构数是指该数出现在它的平方数的右边,如52=25、252=625。
Private Sub Command1_Click()
Dim i As Integer,ip As Integer
For i=1 To 100
ip=【 】
If i<10 Then
If【 】Then
Print i,ip
End If
Else
If【 】Then
Print i,ip
End If
End If
Next i
End Sub
选项
答案
i*i , ip Mod 10=i , ip Mod100=i
解析
判断某数是否为同构数,可先求出该数的平方,然后再判断该数是否小于10,如果小于10,看它的平方除以 10的余数是否和该数相等,如果相等,则该数是同构数;如果该数在10~100之间,则看该数的平方除以100的余数是否和该数相等,若相等,则该数为同构数。本题中中用来存放i的平方,所以[9]处应填“i*i”,在[10]处应判断某一位数i是否为同构数,应填“ip Mod 10=i”,在[11]处应判断其两位数i是否为同构数,应填“ip Mod100=i”。
转载请注明原文地址:https://kaotiyun.com/show/t11p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列命令中,哪个命令能为远程对象生成stub和skeleton?()
下列for循环语句的执行次数是()for(intx=0,y=0;(y!=0)&&(x<4);x++)
在实现Serializable的类中,静态变量和使用______关键字可以使某些数据不被串行化。
下面语句会产生编译错误的是
下列语句byteb=011;System.out.println(b);输出结果为()
JScrollPane面板的滚动条通过移动哪个对象来实现?()
设a=8,则表达式a>>>2的值是()。
在面向对象方法中,类之间共享属性和操作的机制称为【】
下列说法中错误的是()。
在Java语言中最基本的元素是【】。
随机试题
以下哪些主体有权直接向法院申请破产重整?()
中国某公司与甲国某公司因贸易合同的履行发生争议,有关案件在中国法院审理,并涉及向甲国某公司送达的问题。依相关司法解释,关于送达的方式,下列哪些选项是正确的?()
货物制造企业生产系统中,研究与开发的方式包括()
在设备安装调试的监理工作中,在开始具体的安装过程监理时,还需要完成( )工作。
下列有关可调总价合同特点的表述中,正确的有()。
航班在起飞前或到达后,由于包舱人或受雇人的原因而造成飞机延误,由此对承运人造成的损失,应由保险公司承担责任。()
企业对外提供的劳务分属不同会计期间且资产负债表日提供劳务的交易结果不能可靠估计的,不能采用完工百分比法确认其当期劳务收入。()
公安行政强制措施中对人身自由的强制措施主要有()。
Whichofthefollowingprepositionalphrasesisanadverbialofconcession?
TheRailwaysinBritainThesuccessofearlyrailways,suchasthelinesbetweenbigcities,/ledtoagreatincreaseinra
最新回复
(
0
)