[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
看来新手们是不想解答此题,本人先来抛个“砖”吧,期待“玉”的出现:
  1. @echo off
  2. for /l %%i in (11,1,999) do set "str=%%i"&call :lp %%i
  3. pause>nul
  4. :lp
  5. set "a=%a%%str:~,1%"&set "b=%b%%str:~-1%"
  6. set "str=%str:~1,-1%"
  7. if defined str goto lp
  8. if %a% equ %b% echo %1
  9. set "a="&set "b="
复制代码
***共同提高***

TOP

原帖由 youxi01 于 2008-9-18 12:36 发表
楼上效率必然不高
其实可以观察回文数的特点:左右两边对称
巧妙的方法可以直接通过for即可,数秒内就可找出10000以内所有的回文数

楼上说是的即是,本人也是用这种多层循环的方法解的,之所以没有贴出来,是想引其他人来把这块玉献出来。。。

[ 本帖最后由 batman 于 2008-9-18 12:48 编辑 ]
***共同提高***

TOP

返回列表