
CODE: [Copy to clipboard]@echo off
setlocal enabledelayedexpansion
for /l %%a in (1 1 15) do (
set /a t=!random!%%25+1
if not defined _!t! set "arr=!arr!!t! "
set _!t!=ok
)
echo.!arr!
pause
CODE: [Copy to clipboard]@echo off
setlocal enabledelayedexpansion
for /l %%a in (1 1 15) do (
set /a t=!random!%%25+1
if not defined _!t! set "arr=!arr!!t! "
set _!t!=ok
)
echo,得出的数有 %arr%
echo,
set "str2="
for %%x in (%arr%) do (set /a a+=1,fx!a!=0 &set str2=!str2! !a!_%%x)
set /a have=0
call :func "%str2%" "0"
if %have% equ 0 (echo, 没有和为40的组合)
pause
exit
:func
set now=%~1
set /a num=%~2
if !num! equ 40 (set result=%~2 &echo,!result:~2! &set /a have=1)
if "!now: =!"=="" (goto :eof)
for %%a in (%~1) do (
set choose=%%a
set /a ceng+=1
call :func "!now:*%%a=!" "%~2+!choose:*_=!"
set now=%~1
)
goto :eof
CODE: [Copy to clipboard]@echo off
setlocal enabledelayedexpansion
for /l %%a in (1 1 15) do (
set /a t=!random!%%25+1
if not defined _!t! set "arr=!arr!!t! "
set _!t!=ok
)
echo,得出的数有 %arr%
echo,
set "str2="
for %%x in (%arr%) do (set /a a+=1,fx!a!=0 &set str2=!str2! !a!_%%x)
set /a have=0
call :func "%str2%" "0"
if %have% equ 0 (echo, 没有和为40的组合)
pause
exit
:func
set now=%~1
set /a num=%~2
if %num% gtr 40 (goto :eof)
if !num! equ 40 (set result=%~2 &echo,!result:~2! &set /a have=1)
if "!now: =!"=="" (goto :eof)
for %%a in (%~1) do (
set choose=%%a
set /a ceng+=1
call :func "!now:*%%a=!" "%~2+!choose:*_=!"
set now=%~1
)
goto :eof
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |