flyinspace

哦.看来只有另外想办法了....

利用skip吧..

@echo off
for /f "tokens=* " %%m in ('findstr /r "^A[0-9][0-9][0-9]$" 1.txt ^| sort /+1') do (
        for /f "delims=: tokens=1,2 " %%i in ('findstr /n /r "^A[0-9][0-9][0-9]$" 1.txt') do if "%%j"=="%%m" echo %%m & call :loop %%i
        echo.
        )
goto :exit
:loop
        for /f "skip=%1 tokens=* " %%n in (1.txt) do (
                echo %%n| findstr /r "^A[0-9][0-9][0-9]$">nul
                if not errorlevel 1 goto :EOF
                echo %%n
                )
        goto :EOF
:exit
pause
复制代码

[ 本帖最后由 flyinspace 于 2008-9-3 14:59 编辑 ]

flyinspace

原帖由 batman 于 2008-9-2 20:10 发表

如就本题而言，这应该是最简洁的方案了，但如果要通用可能还是要用到set进行排序。

哦。。。那么文本的格式稍微变一下。

保持原题不变呢。

只是少了行距，和多了混乱的格式而已。

A111
Assure
A12
Cons tant
Smail
A012
Exa
Explosive
Weird
A12345
Admission
A077
Chant
Reli gious
Praise
Rhyming
32987
Parsley
A034
Faith
Zealous
Absorb
24980
Principle
复制代码

flyinspace

原帖由 pusofalse 于 2008-9-3 15:15 发表
还是一样的解法吧，只不过要麻烦了。先找出哪些是序号，在序号前补位。
不知还有什么方法。

只是看到你解决问题的方案比较儿戏。
不过也够简洁。

所以故意难为你一下。