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

necn33

怎么算不同搭配组数问题
如 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

@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

回复 2# bailong360

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

bailong360

回复 3# necn33


    已修改

necn33

回复 4# bailong360

能否删重复 竖向排列呢

pcl_test

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

CrLf

回复 6# pcl_test


    100 技术分可以换书了嗷