水仙花数.txt

来自「s11ss写的批处理。他把很多C语言中经典的例子都用批处理实现了」· 文本 代码 · 共 25 行

@echo off
setlocal enabledelayedexpansion
::::::::::::::::::::::::::::     水仙花数     ::::::::::::::::::::::::::::
::::::::::::::::::::::::::::{s11ss  2007-9-24}::::::::::::::::::::::::::::
echo 问题：
echo 在100-999这些三位数中，有些数本身等于它百位上数字的立方加上十位上数字的立方加上个位上数字的立方，这样的三位数叫水仙花数。
echo.
echo 计算中...
set str=
for /l %%i in (100,1,999) do (
        set/a nb=%%i/100
        set/a t1=%%i%%100
        set/a nsh=!t1!/10
        set/a ng=!t1!%%10
        set/a n1=!nb!*!nb!*!nb!
        set/a n2=!nsh!*!nsh!*!nsh!
        set/a n3=!ng!*!ng!*!ng!
        set/a n=!n1!+!n2!+!n3!
        if !n! equ %%i set str=!str! %%i
)
echo.
echo 这些数是: 
echo !str!
echo 按任意键退出...
pause>nul