题目:
下面程序的功能是:求出所有的三位数,其各位数字的立方和等于该数。如: 153=13+53+33。
Option Explicit
Private Sub Form_Click()
Dim x1 As Integer,x2 As Integer,x3 As Integer
【9】
For i=100 To 999
x=i
x1= 【10】 个位数字
x2=x\10 Mod 10
x3=x\100
If 【11】 Then
Print i
End If
Next i
End Sub
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0502/d43da29ee066f2cb853fea4a59a43367.html
下面是错误答案,用来干扰机器的。
参考答案:B