VB程式設計，如果一個三比特整數等於其各位數位的立方和，則稱這個數為水仙花數.輸入一個整數判斷其是否為水仙花數. Private Sub Form_Load（） Dim x%，a%，b%，c%，y% x = InputBox（“請輸入三位數”，“提示框”） If Len（x）= 3 Then a = Val（Mid（x，1,1）） b = Val（Mid（x，2,1）） c = Val（Mid（x，3,1）） y = Val（x） If a ^ 3 + b ^ 3 + c ^ 3 = y Then Print“是水仙花水” Else Print“不是水仙花數” End If Else Print“輸入錯誤” End If End Sub 以上哪裡錯了？

VB程式設計，如果一個三比特整數等於其各位數位的立方和，則稱這個數為水仙花數.輸入一個整數判斷其是否為水仙花數. Private Sub Form_Load（） Dim x%，a%，b%，c%，y% x = InputBox（“請輸入三位數”，“提示框”） If Len（x）= 3 Then a = Val（Mid（x，1,1）） b = Val（Mid（x，2,1）） c = Val（Mid（x，3,1）） y = Val（x） If a ^ 3 + b ^ 3 + c ^ 3 = y Then Print“是水仙花水” Else Print“不是水仙花數” End If Else Print“輸入錯誤” End If End Sub 以上哪裡錯了？

Private Sub Form_Click（）Dim x As StringDim a%，b%，c%，y%x = InputBox（“請輸入三位數”，“提示框”）If Len（x）= 3 Thena = Val（Mid（x，1,1））b = Val（Mid（x，2,1））c = Val（Mid（x，3,1））y = Val（x）If a ^ 3 + b ^ 3 + c ^ 3…

“水仙花數”是指一個三位數，它的各位數位的立方和等於其本身，比如：153=1^3+5^3+3^3.現在要
“水仙花數”是指一個三位數，它的各位數位的立方和等於其本身，比如：153=1^3+5^3+3^3.現在要求輸出所有在m和n範圍內的水仙花數.
（100

功能好像沒錯，但不符合題的要求，沒有寫出求水仙花數的獨立函數.你按要求整理一下可能就過了.

輸出所有得“水仙花數”，所謂“水仙花數”是指一個三位數，其各位數位立方之和
例如，153是水仙花數！因為153=1*1*1+5*5*5+3*3*3

#include
void main（）
{
int i，b，s，g；
for（i=100；i