設計一個算灋，求所有這樣的三位數這些三位數等於它各位數位的立方和.用Qbasic程式求解設計一個算灋，求所有這樣的三位數這些三位數等於它各位數位的立方和. n=100 x=1 y=0 i=0 Do IF n=x^3+y^3+i^3 THEN PRINT n END IF n=n+1 i=i+1 IF i>9 THEN i=0 y=y+1 END IF IF y>9 THEN y=0 x=x+1 END IF LOOP UNTIL n>=1000 END

你說的是水仙花數嗎
n=100
x=1
y=0
i=0
Do
IF n=x^3+y^3+i^3 THEN
PRINT n
END IF
n=n+1
i=i+1
IF i>9 THEN
i=0
y=y+1
END IF
IF y>9 THEN
y=0
x=x+1
END IF
LOOP UNTIL n>=1000
END

RELATED INFORMATIONS