中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-07-21 10:38
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 给新人出的一道字符排序题(加分题): 查看 2,375 回复 21
楼 主 给新人出的一道字符排序题(加分题): 发表于 2008-05-21 10:22 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
有一组字符:13 z 113 -3 778 10004 f k a 119 -101 8 -19 m
要求通过批处理进行排序输出: -101 -19 -3 8 13 113 119 778 10004 a f k m z
请尽量采用不生成临时文件的办法。
PS:第一个做出来的新人,我加15分。
----------------------------------------------------------------------------------------------------------
我的答案:

@echo off&setlocal enabledelayedexpansion
set str=13 z 113 -3 778 10004 f k a 119 -101 8 -19 m
echo 排序前:%str%
for %%i in (%str%) do call,set var=!var! #%%i#
for %%i in (%var%) do set a=%%i&call :lp
echo 排序后:%var:#=%
pause>nul&goto :eof
:lp
for %%i in (%var%) do (
set b=%%i&set b=!b:#=!&set c=!a:#=!
if !b! lss !c! (
set var=!var:%a% =!
set var=!var:%%i=%%i %a%!
) else (
set var=!var!
)
)


[ Last edited by zw19750516 on 2008-5-21 at 08:19 PM ]
批处理之家新域名:www.bathome.net
2 发表于 2008-05-21 12:05 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
晕,我是出给新人做的!让大家活跃下思维啊。
批处理之家新域名:www.bathome.net
3 发表于 2008-05-21 12:51 ·  中国 上海 电信
初级用户
★★
积分 160
发帖 81
注册 2006-07-27 17:52
19年会员
UID 59377
性别 男
状态 离线
@echo on
set var=13 z 113 -3 778 10004 f k a 119 -101 8 -19 m
for /f %%a in ('%var%') do (
set /a var1=%%a,var2=%%b, var3=%%c,var4=%%d,var5=%%e,var6=%%f,var7=%%g,var8=%%h, /a var9=%%i,var10=%%j,var11=%%k,var12=%%l,var13=%%m,var14=%%n
)
echo %var11% %var13% %var4% %var12% %var1% %var3% %var10% %var5% %var6% %var9% %var7% %var8% %var14% %var2%
pause

为什么这样取不出值, 请高手指点

[ Last edited by jia332 on 2008-5-21 at 12:53 PM ]
4 发表于 2008-05-21 12:55 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
1 你的代码有误:连续set赋值时之间只能用&格开,如set a=1&set b=2。
2 象这样不如直接:echo -101 -19 -3 8 13 113 119 778 10004 a f k m z
批处理之家新域名:www.bathome.net
5 发表于 2008-05-21 12:58 ·  中国 上海 电信
初级用户
★★
积分 160
发帖 81
注册 2006-07-27 17:52
19年会员
UID 59377
性别 男
状态 离线
set /a a=1+1,b=2+1,c=3+1
echo %a% %b% %c%
问什么这样就可以,zw19750516能否教小弟一下
6 发表于 2008-05-21 13:06 ·  中国 江苏 常州 溧阳市 电信
银牌会员
★★★
积分 2,404
发帖 946
注册 2005-09-08 13:44
20年会员
UID 42345
状态 离线
我把前面发的改一下应该就可以
简单!简单!再简单!
7 发表于 2008-05-21 13:11 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
请terse兄留给新人多思考啊
批处理之家新域名:www.bathome.net
8 发表于 2008-05-21 13:17 ·  中国 重庆 联通
中级用户
★★
积分 363
发帖 162
注册 2007-04-22 21:31
19年会员
UID 86104
性别 男
状态 离线
太难了..
9 发表于 2008-05-21 13:32 ·  中国 江苏 常州 溧阳市 电信
银牌会员
★★★
积分 2,404
发帖 946
注册 2005-09-08 13:44
20年会员
UID 42345
状态 离线
Originally posted by zw19750516 at 2008-5-21 13:11:
请terse兄留给新人多思考啊

所以我没发出来 这两天股票跌S我 没心情了 还是去看一会盘面
简单!简单!再简单!
10 发表于 2008-05-21 14:01 ·  中国 新疆 伊犁哈萨克自治州 伊宁市 电信
新手上路
积分 4
发帖 2
注册 2008-05-20 07:07
18年会员
UID 119153
性别 男
状态 离线
我怎么不会呀
11 发表于 2008-05-21 14:41 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线
我只能写成这样了...

@echo off
setlocal enabledelayedexpansion
set i=1
set text="13 z 113 -3 778 10004 f k a 119 -101 8 -19 m"
:loop
for /f "tokens=1,* delims= " %%i in (%text%) do (
set a%i%=%%i
set text="%%j"
set /a i+=1
)
if !text! neq "" goto loop
set /a i-=1
for /l %%a in (1,1,%i%) do (
for /l %%b in (1,1,%i%) do (
if !a%%a! lss !a%%b! (
set tm=!a%%a!
set a%%a=!a%%b!
set a%%b=!tm!
)
)
)
for /l %%c in (1,1,%i%) do set /p=!a%%c! <nul
echo.
pause
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
bat-zw +3 2008-05-21 15:02
12 发表于 2008-05-21 14:43 ·  中国 湖南 娄底 电信
银牌会员
★★★
积分 2,268
发帖 879
注册 2006-12-19 16:23
19年会员
UID 73968
性别 男
状态 离线
作的出这个题的,最多只是论坛新人,绝不会是批处理新人。
致精致简!
13 发表于 2008-05-21 15:01 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
同意兄的说法,其实我的最终目的还是让论坛能活跃起来。
ps:jmz573515的代码还可以简化。
批处理之家新域名:www.bathome.net
14 提示: 发表于 2008-05-21 16:04 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
&&可直接用比较大小的方法,排序时请注意字符的定位和唯一性。
批处理之家新域名:www.bathome.net
15 发表于 2008-05-21 17:01 ·  中国 山东 淄博 联通
银牌会员
★★★
积分 1,604
发帖 646
注册 2008-04-13 23:39
18年会员
UID 115804
性别 男
状态 离线
我的思路。。。
先提取出数字,并分别赋予变量,set自动排序
然后判断哪些没有被赋予变量,没有被赋予的就是字母,同上,set第二次排序。。
或者新建文件,分别以这些字母命名,然后dir /b o:n 输出命令结果~
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
论坛跳转: