keen

@echo off&setlocal enabledelayedexpansion
for /l %%i in (0 1 1000) do (
    set a=%%i
    if "!a:~0,1!"=="!a:~-1,1!" echo !a!
)
pause
复制代码

[ 本帖最后由 keen 于 2009-4-2 22:39 编辑 ]

keen

来个10000以内的回文数：

@echo off&setlocal enabledelayedexpansion
for /l %%i in (0 1 1000) do (
    set a=%%i
    if "!a:~0,1!"=="!a:~-1,1!" echo !a!
)
for /l %%i in (1001 1 10000) do (
    set a=%%i
    if "!a:~0,1!"=="!a:~-1,1!" if "!a:~1,1!"=="!a:~-2,1!" echo !a!
)
pause
复制代码

其实是在1000以内的多加几行。

keen

简洁10000以内的回文数：

@echo off&setlocal enabledelayedexpansion
for /l %%i in (0 1 10000) do (
    set a=%%i
    if "!a:~0,1!"=="!a:~-1,1!" if !a! lss 1000 (echo !a!) else (if "!a:~1,1!"=="!a:~-2,1!" echo !a!) 
)
pause
复制代码