@echo off&setlocal enabledelayedexpansion
for /l %%i in (1 1 9) do set _%%i=%%i
set /a N=9,R=5,S=N-R,i=1,j=1
for /l %%i in (1,1,%S%) do set /a "i*=(N-%%i+1),j*=%%i"
set /a i/=j
for /l %%i in (1 1 %R%) do set /a A%%i=%%i,B%%i=%%i+S&set #=!#! %%i
echo!#!
for /l %%a in (2 1 !I!) do (
    set "#="
    for /l %%i in (1 1 !R!) do if not #!A%%i! == #!B%%i! set M=%%i
    for %%i in (!M!) do set L=!A%%i!
        for /l %%j in (1 1 %R%) do (
            if %%j geq !M! set/a A%%j=L+1,L=A%%j
            set #=!#! !A%%j!
        )
    for %%i in (!#!) do set Emp=!Emp! !_%%i!
    echo!Emp!&set "Emp="
)
echo 总 !i! 组
pause
复制代码