[已解决]批处理怎么算不同搭配组数问题

necn33 · 发表于 2015-3-27 22:44:34

怎么算不同搭配组数问题
如 123 两个数字一组的话
就有 12 13 23 三个组
12345 两个数字一组的话
就有 12 13 14 15 21 23 24 25 31 等这些组

数字为0-9

如 :a.txt 有 123 456 ...等等

结果：b.txt 就有 12 13 23 45 46 56.....等等三个组生成的文本b.txt 删除重复竖着排列

小弟刚到贵论坛多指教下在此先感谢各路大侠

bailong360 · 发表于 2015-3-27 22:59:25

本帖最后由 bailong360 于 2015-3-27 23:55 编辑

@Echo Off
SetLocal EnableDelayedExpansion
For /F "Delims=" %%i In (a.txt) Do Set N=%%i&Call :Loop
Exit
:Loop
Set Num=%Num% %N:~0,1%
Set N=%N:~1%
If Not "%N%"=="" Goto Loop
(For %%i In (%Num%) Do (
Set Num=!Num:%%i=!
For %%j In (!Num!) Do (
If Not Defined _%%i%%j (
Set _%%i%%j=0
Echo %%i%%j
)
)
))>>b.txt

复制代码

已修改

necn33 · 发表于 2015-3-27 23:16:48

回复 2# bailong360

刚才我没描述清楚 a.txt 有若干行测试1楼的代码后生成的b.txt只有一个

bailong360 · 发表于 2015-3-27 23:31:27

回复 3# necn33

已修改

necn33 · 发表于 2015-3-27 23:43:19

回复 4# bailong360

能否删重复竖向排列呢

pcl_test · 发表于 2015-3-28 00:10:39

回复 1# necn33
问题得到解决后请在标题最前面注明[已解决]
http://www.bathome.net/thread-3473-1-1.html

CrLf · 发表于 2015-3-28 11:01:30

回复 6# pcl_test

100 技术分可以换书了嗷

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文本处理] [已解决]批处理怎么算不同搭配组数问题

评分

评分

评分