terse

@echo off&setlocal enabledelayedexpansion
for /L %%i in (1 1 3) do (
    set /a "z=7-%%i,N=%%i*2"
    for /L %%j in ( %%i 1 !z!) do (
        set /a "M=N+%%j,W=2*%%j+%%i,i=^!(M^^7)*%%i+^!(W^^7)*%%j"
        set /a "j=^!(M^^7)*%%j+^!(W^^7)*%%i"
        if !i! neq 0 (
           for /L %%k in (1 1 3) do (
               set /a "M=%%k*2+i"
               if !M! equ 7 (
                  echo !i! !j! !i!
                  echo %%k !i! %%k
                  echo %%k !i! %%k
                  echo;
               ) 
           ) 
        )
    )
)
pause>NUL
复制代码

偷点懒

@echo off&setlocal enabledelayedexpansion
for /L %%i in (1 1 3) do (
    set /a "z=7-%%i,N=%%i*2"
    for /L %%j in ( %%i 1 !z!) do (
        set /a "M=N+%%j,W=2*%%j+%%i,i=^!(M^^7)*%%i+^!(W^^7)*%%j"
        set /a "j=^!(M^^7)*%%j+^!(W^^7)*%%i"
        if !i! neq 0 (
           set /a "k=(7-i)/2,M=2*k+i"
           if !M! equ 7 (
              echo !i! !j! !i!
              echo !k! !i! !k!
              echo !k! !i! !k!
              echo;
           )
        )
    )
)
pause>NUL
复制代码