批处理列出1000以内回文数

wxcute

[新手练功区的新手跟帖不多，可能是因为题目太难了。各位等等新手两天再回答好了。]
我国古代有一种回文诗，倒念顺念都有意思，例如“人过大佛寺”，倒读起来便是“寺佛大过人”。还有经典的对联“客上天然居，居然天上客”。此种例子举不胜举。

从左向右读与从右向左读完全一样的数字就是回文数，如11、121、767等等。

pusofalse

经典！以前做过一个找出10000以内的回文数的题目，都一样。就是不知131 464 15751
这样的是不是回文数。

wxcute

对阿，就是这样的。

10000太多了，少点给人在感觉上压力不会太大。

wwjpl

"上海自来水来自海上"

正念倒念都一样，算不算回文？

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="COPY

youxi01

楼上效率必然不高
其实可以观察回文数的特点：左右两边对称
巧妙的方法可以直接通过for即可，数秒内就可找出10000以内所有的回文数

batman

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

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

[ 本帖最后由 batman 于 2008-9-18 12:48 编辑 ]

youxi01

当然楼上的思路是投机取巧的办法，不是真正意义上的检测 回文数，纯粹是列出

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>nulCOPY

不过考虑全了没有，我就不知道了

youxi01

楼上的还有些不全：四位数的不见了
还有一些4004,404之类

我的代码稍微加入了统计回文数个数...

lovelymorning

@echo off
setlocal enabledelayedexpansion
for /l %%i in (11,1,999) do (
set a=%%i
if "!a:~0,1!"=="!a:~-1!" echo %%i
)
pauseCOPY

献丑了。。。

z_berry

0，1，2，3，4，5，6，7，8，9不算吗？

原帖由 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 ...

[ 本帖最后由 z_berry 于 2008-9-23 13:21 编辑 ]

wxcute

这是我的不严谨之处。
我自己也不大清楚。
如果单个数也是的话，就要从 0 开始循环了。

h5599859

请问9楼的你代码中的set /a n+=1和set /a n+=2这两个在这段代码中各表示什么意思啊

wxcute

回 14 楼

set /a n+=1 等同于 set /a n=n+1
set /a n+=2 等同于 set /a n=n+2