pan528

回复 44# terse

回车没有剔除，我还发现一个新问题：所有代码在34/9时都变成了二分法！即：
1    5    9    13   17   21   25   29   32
2    6    10   14   18   22   26   30   33
3    7    11   15   19   23   27   31   34
4    8    12   16   20   24   28
而三分法应为：
1    5    9    13   17   21   25   29   33
2    6    10   14   18   22   26   30   34
3    7    11   15   19   23   27   31
4    8    12   16   20   24   28   32
我怀疑是算法有问题。
各位高手找找原因吧。

pan528

你们的代码太精炼了，我许多方面都没有看明白。
我以前写了一个切分文本的代码，很菜。代码很长，很繁琐，方法也简单，拿出来请各位高手改改。
但，我试过好多次，没有出错过。

:: 代码代号含义：
:: k=文本总行数
:: cut=切分的列数
:: x=k/c=每列的行数
:: r=remainder=余数行=k-cx
:: ak=总添加的行数=(cut*(x+1))-k
:: s=记录当前文件需要排列的行数=x或(x+1)
:: s2=少行列=s-ak
:: n=记录当前列输出到第几行
:: m=记录当前输出到第几个文件

@echo off
title 切分文本程序（三分法）

set file=a
set Cut=9
setlocal enabledelayedexpansion
for /f "delims=" %%a in (%file%.txt) do set/a k+=1
set /a x=%k%/%Cut%
set /a r=%k%-%Cut%*%x%
set /a ak=(%Cut%*(%x%+1))-%k%
set m=
set m=1
set n=
for /f "delims=" %%i in (%file%.txt) do (
set /a n+=1
	if !r! leq 0 (
	set /a s=%x%
	if !n! leq !s! echo %%i>>%file%_!m!.txt
	if !n! equ !s! set n=0 & set /a m+=1
		) else (
		set /a s=%x%+1
		if !ak! lss !s! (
		if !n! leq !s! echo %%i>>%file%_!m!.txt
		if !n! equ !s! set n=0 & set /a m+=1
		if !m! equ !cut! set /a s2=!s!-!ak!
		if !n! equ !s2! for /l %%i in (1,1,%ak%) do echo.>>%file%_!cut!.txt
			) else (
			if !m! leq !r! (
			if !n! leq !s! echo %%i>>%file%_!m!.txt
			if !n! equ !s! set n=0 & set /a m+=1
				) else (
				if !m! gtr !r! if !n! leq !x! echo %%i>>%file%_!m!.txt
				if !m! gtr !r! if !n! equ !x! echo.>>%file%_!m!.txt
				if !n! equ !x! set n=0 & set /a m+=1
					)
				)
			)
		)
endlocal
goto:eof
复制代码

pan528

回复 47# terse

34/9通过了，34/11又变成了9列，我想算法可能有缺陷或漏洞 ...

pan528

回复 49# terse
34/11，34/9都通过了，但是仍二分法，不是三分法：

二分法：
1       5       9       13      17      21      25      29      32
2       6       10      14      18      22      26      30      33
3       7       11      15      19      23      27      31      34
4       8       12      16      20      24      28

三分法：（余数小于每列的行数时，空行全部放在最后一列）
1       5       9       13      17      21      25      29      33
2       6       10      14      18      22      26      30      34
3       7       11      15      19      23      27      31
4       8       12      16      20      24      28      32