当前位置: > 找出100~1000之内满足下列条件的数据,各位数字的立方和等于本数.如何用写VB程序代码...
题目
找出100~1000之内满足下列条件的数据,各位数字的立方和等于本数.如何用写VB程序代码

提问时间:2021-04-01

答案
Public Sub t1()Dim i,a,b,c,d As IntegerFor i = 100 To 1000a = i 1000b = i 100 Mod 10c = i 10 Mod 10d = i Mod 10If a ^ 3 + b ^ 3 + c ^ 3 + d ^ 3 = i ThenDebug.Print iEnd IfNext iEnd Sub运行结果:...
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
版权所有 CopyRight © 2012-2019 超级试练试题库 All Rights Reserved.