水仙花数
本文档由 文山文海 分享于2009-01-19 20:23
水仙花数是指一个三位数,其各个数之立方和等于该数,例如153,即为一水仙花数,因为153=13+53+33FORTRAN 源程序 WRITE(*,30) DO 10 K=100,999 IA=K/100 IB=MOD(K,100)/10 IC=MOD(K,10) IF(K¸NE¸IA**3+IB**3+IC**3) GOTO 10 WRITE(¸¸¸
下载文档
收藏
打印
君,已阅读到文档的结尾了呢~~