安图妮左槽宝珠做多久:如果用 VB 函数过程 编写 水仙花数 程序 该怎样写??谢谢 赐教 !! 急!!
来源:百度文库 编辑:高考问答 时间:2024/05/11 19:22:11
用 fuction 函数 ,通过 函数调用 实现结果,谢谢!!
dim i as integer
for i=100 to 999
if ((i-i mod 100)/100)^3+(((i mod 100)-(i mod 10))/10)^3+(i mod 10)^3=i then print i
next