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复制代码
TOP
zqy (Bat学员)当前离线
五级士官
@echo off for /l %%i in (1 1 9) do ( echo %%i%%i for /l %%j in (0 1 9) do ( echo %%i%%j%%i ) ) pause>nul复制代码
stu_light 当前离线
二级士官
qq641255849 当前离线
少尉
@echo off for /l %%a in (11,1,999) do (set str=%%a&call :a) pause :a set n3=%str:~0,1% set n2=%str:~1,1% set n1=%str:~2,1% if "%n1%" equ "" (set rts=%n2%%n3%) else (set rts=%n1%%n2%%n3%) if %rts% equ %str% (echo %str%) goto :eof复制代码
wxcute (冰疼)当前离线
h5599859 当前离线
三级士官
z_berry 当前离线
原帖由 youxi01 于 2008-9-18 12:53 发表 测试代码:@echo off echo 0set n=1for /l %%i in (1 1 9) do ( echo %%i echo %%i%%i set/a n+=2 for /l %%j in (0 1 9) do ( echo %%i%%j%%i echo %%i%%j%%j%%i set/a n+=2 ) ) echo 10000以内总共有回文数%n%个 paus ...
lovelymorning 当前离线
四级士官
@echo off setlocal enabledelayedexpansion for /l %%i in (11,1,999) do ( set a=%%i if "!a:~0,1!"=="!a:~-1!" echo %%i ) pause复制代码
评分人数
youxi01 当前离线
@echo off for /l %%i in (1 1 9) do ( echo %%i%%i set/a n+=1 for /l %%j in (0 1 9) do ( echo %%i%%j%%i echo %%i%%j%%j%%i set/a n+=2 ) ) echo 10000以内总共有回文数%n%个 pause>nul复制代码
batman 当前离线
考官
原帖由 youxi01 于 2008-9-18 12:36 发表 楼上效率必然不高 其实可以观察回文数的特点:左右两边对称 巧妙的方法可以直接通过for即可,数秒内就可找出10000以内所有的回文数