vb计算器代码_水仙花数vb代码|全球快报

(资料图)

1、Dim a As Integer, b As Integer, c As IntegerFor a = 1 To 9For b = 0 To 9For c = 0 To 9If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^ 3 Then Print a & b & cNext cNext bNext a 答案补充 运行结果是：153 370 371 407。

本文分享完毕，希望对大家有所帮助。