单项选择题
> 编程显示100~500之间所有的水仙花数之和。
(水仙花数是3位数，其各位数立方之和等于该数本身)
Private Sub Form_Click()
Print"100~500之间所有的水仙花数为："
Dim x%, a%, b%, c%
For x = 100 To 500
a= x Mod 10
b= (x Mod 100) \ 10
c= x \ 100
If Then Print x
Next x
End Sub
A．x = a + b*10 + c*100
B．x = a*100 + b*10 + c
C．x = a ^ 3 + b ^ 3 + c ^ 3
D．x = a ^ 3 + b ^ 2 + c
> 编程显示100~500之间所有的水仙花数之和。
(水仙花数是3位数，其各位数立方之和等于该数本身)
Private Sub Form_Click()
Print"100~500之间所有的水仙花数为："
Dim x%, a%, b%, c%
For x = 100 To 500
a= x Mod 10
b= (x Mod 100) \ 10
c= x \ 100
If Then Print x
Next x
End Sub
A．x = a + b*10 + c*100
B．x = a*100 + b*10 + c
C．x = a ^ 3 + b ^ 3 + c ^ 3
D．x = a ^ 3 + b ^ 2 + c
，则方程
没有实根的概率为（ ）。
A.
B.
C.
D.
