batman

原帖由 pusofalse 于 2008-9-1 21:23 发表
这题果真难倒了新手吗，期待新手解答出此题。以下，本人的解，期待更加简洁的解。@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (a.txt) do (
     set "var=%%a"
     if "!var:~1,1!" le ...

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

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
复制代码

pusofalse

还是一样的解法吧，只不过要麻烦了。先找出哪些是序号，在序号前补位。
不知还有什么方法。

flyinspace

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

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

所以故意难为你一下。

keen

用了N多的FOR：

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
    set str=%%i
    if "!str:~0,1!"=="A" (
        set var=!str:~-3!
        if !var! gtr 0 if !var! lss 999 set /a n+=1
)
call,set ".!n!=%%.!n!%%"%%i" "
)
for /f "tokens=2 delims==" %%i in ('set .') do (
    for /f "tokens=1" %%a in ("%%i") do (
        set hh=%%a&set num=!hh:~2,3!&set _!num!=%%i
))
for /f "tokens=2 delims==" %%i in ('set _') do (
    for %%b in (%%i) do echo %%~b
    echo\
)
pause
复制代码

[ 本帖最后由 keen 于 2009-5-15 00:01 编辑 ]

weichenxiehou

@echo off&setlocal enabledelayedexpansion
for /f "usebackq" %%i in (`findstr "^A[0-9]*$" a.txt^|sort`) do (set /a num+=1&set "_!num!=%%i")
for /l %%a in (1 1 %num%) do (
	call set "var=%%_%%a%%"
	for /f "delims=" %%j in (a.txt) do (
		if "%%j"=="!var!" (set flag=yes&set /a n=0) else (
		echo %%j|findstr "^A[0-9]*$">nul&&(set flag=&set /a n+=1&(if !n! equ 1 echo.))
		)
		if defined flag echo %%j		
	)
)
复制代码

[ 本帖最后由 weichenxiehou 于 2011-1-1 20:02 编辑 ]

lengmoke

@echo off & setlocal EnableDelayedExpansion
md temp
for /f "tokens=1* delims=:" %%i in ('findstr /n .* "a.txt"') do (
    if not "%%j"=="" ( set "str=%%j" & set "strs=!strs! !str: =+!" ) else ( md "temp\!strs!" & set "strs=" )
)
md "temp\!strs!"
for /f "delims=" %%i in (' dir /b/on %cd%\temp ') do (
    for %%j in (%%i) do ( set "str=%%j" & echo !str:+= !)
    echo.
)
rd /q/s temp
复制代码

qixiaobin0715

试了试，发现还是和前辈们思路基本一致，就不好意思发出来了。