求100^999中所有的水仙花数,
题目
求100^999中所有的水仙花数,
答案
Private Sub Form_Load() Me.AutoRedraw = True For i = 100 To 999 If (i 100) ^ 3 + ((i Mod 100) 10) ^ 3 + (i Mod 10) ^ 3 = i Then Print i Next iEnd Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 用电子式写出下列离子化合物的形成过程
- 已知ABCDEFGHIK 代表10个互不相同的大于零的自然数,已知C加B等于A,D加E等于B,E加F等于C,G加H等于D,H加I
- 200分!中译英(2)
- 丁丁用2天时间看完一本书,第一天看了全书的7分之4,第2天看的页数比全书的5分之4少26页.1.全书有多少页?
- -(-71又1/2)= -丨-8丨=
- 测量中的误差都是不可避免的
- X美XX,XXX环,XX境X,X美XX四个类型的成语各一个,
- 影响鹿群生存的生物因素有哪些
- 岩石与土壤之间有什么关系
- 细胞内各个细胞器的尺寸大小