CrLf

来一个兼容性很差的...抛砖了哈：

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
   set /a n=0
   for %%b in (%%a) do set /a "n+=1<<%%b"
   if not defined _!n! echo %%a
   set _!n!=_
)
pause
复制代码

CrLf

来一个列排序版的，用的是比较简陋的排序方式，列数一多就蛋疼了...

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1-3" %%a in (1.txt) do (
	set /a a=%%a,b=%%b,c=%%c
	for %%d in (c-b b-a c-b) do (
		for /f "tokens=1,2 delims=-" %%e in ("%%d") do (
			if !%%e! gtr !%%f! set /a %%e=!%%f!,%%f=!%%e!
		)
	)
	if not defined _!a!_!b!_!c! (
		echo %%a %%b %%c
		set _!a!_!b!_!c!=_
	)
)
pause
复制代码

CrLf

来一个不那么蛋疼的，只要在 str 中给够足量的变量名，应可兼容任意列数：

@echo off&setlocal enabledelayedexpansion
set str=a b c
::abc 分别代表三个变量名，表示只有三列

for %%a in (!str!) do (
	for /f %%b in ("!str:*%%a=!") do (
		if defined list set "list=!list!%%a "
		set "list=%%a !list!"
		set list=!list:%%a =%%b-%%a !
	)
)
::获取用于 if 判断的顺序表

for /f "delims=" %%a in (1.txt) do (
	set tmp=%%a
	for %%b in (%str%) do (
		for /f %%c in ("!tmp!") do set %%b=%%c
		set tmp=!tmp:~2!
	)
	rem 设置每列的值到对应变量

	for %%d in (%list%) do (
		for /f "tokens=1,2 delims=-" %%b in ("%%d") do (
			if !%%b! gtr !%%c! set /a %%b=!%%c!,%%c=!%%b!
		)
	)
	if not defined _!a!_!b!_!c! (
		echo %%a
		set _!a!_!b!_!c!=_
	)
)
pause
复制代码

CrLf

有想法，不过也是不严谨，3 0 0 与 2 2 1 平方和相同

CrLf

不过如果列数与指数相同，好像没想到有反例可以证明这种算法不严谨