batman 当前离线
考官
荣誉版主
@echo off for /l %%i in (11,1,999) do set "str=%%i"&call :lp %%i pause>nul :lp set "a=%a%%str:~,1%"&set "b=%b%%str:~-1%" set "str=%str:~1,-1%" if defined str goto lp if %a% equ %b% echo %1 set "a="&set "b="复制代码
TOP
原帖由 youxi01 于 2008-9-18 12:36 发表 楼上效率必然不高 其实可以观察回文数的特点:左右两边对称 巧妙的方法可以直接通过for即可,数秒内就可找出10000以内所有的回文数