有些三位数等于它各位数字的立方和,设计一个算法,求所有这样的三位?
最好是包括和程序语言,如果条件有限,则选择其中一种表达方式即可。
用最简单的QBASIC语言编制的程序: FOR K=100 TO 999 A=INT(K/100) B=INT((K-100*A)/10) C=K-100*A-10*B IF K=A*A*A+B*B*B+C*C*C THEN 10 20 NEXT K END 10 PRINT K; GOTO 20 运行结果: 153 370 371 407