悬崖之树

@echo off
setlocal enabledelayedexpansion

for /l %%i in (0,1,1200) do (
     set a=%%i
     if "!a:~0,1!"=="!a:~-1!"  (
       if "!a:~1,1!"=="" (
         echo !a!>>1.txt
       ) else (
                if "!a:~1,1!"=="!a:~-2,1!" (
                  if "!a:~3,1!"=="" (
                    echo !a!>>1.txt
                  ) else echo 你的数太大啦！&goto  out
                )
         )
     )
)
:out
pause
复制代码

悬崖之树

回复 29# 悬崖之树
这个代码有问题，并不是只要测试到六位数就提示“你输入的数太大了”，而是要到类似 “124521” 之类的六位数才会提示。下面是改进后的

@echo off
setlocal enabledelayedexpansion
if exist 1.txt del 1.txt
:ks
set /p num=请输入一个最多5位的正整数：
if %num% gtr 999999 echo 你的数太大了，请重新输入！& goto ks 
for /l %%i in (0,1,%num%) do (
     set a=%%i
     if "!a:~0,1!"=="!a:~-1!"  (
       if "!a:~3,1!"=="" (
         echo !a!>>1.txt
       ) else (
                if "!a:~1,1!"=="!a:~-2,1!" (
                  if "!a:~5,1!"=="" (
                    echo !a!>>1.txt
                  )
                )
         )
     )
)
echo 结果已经保存在当前目录下的1.txt文件中
pause
复制代码