>>> import random
>>> a = list(range(1,20))
>>> a
[1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
>>> random.shuffle(a)
>>> a
[5, 14, 4, 6, 1, 12, 11, 13, 7, 3, 17, 10, 16, 8, 18, 19, 15, 9, 2]
>>> 
复制代码

@echo off
setlocal enabledelayedexpansion
for /l %%a in (1,1,!n!) do set #!random!=%%a
for /f "tokens=2 delims==" %%i in ('set #') do echo,%%i
pause
复制代码

for /f "usebackq delims=" %%a in (`dir /b *.txt`) do (
    call :f "%%a"
)
for /f "usebackq tokens=2 delims==" %%a in (`set _`) do (
    echo %%a
)

goto :END

:f
set n=%random%
if defind _%n% goto :f
set _%n%=%~1
goto :eof
复制代码

@echo off

for /f "usebackq delims=" %%a in (`dir /b *.txt`) do (
    call :f "%%a"
)
for /f "usebackq tokens=2 delims==" %%a in (`set _`) do (
    echo %%a
)

goto :END

:f
set n=%random%
if defined _%n% goto :f
set _%n%=%~1
goto :eof

:END
复制代码

@echo off & cd /d "%~dp0"
call :getSingleRandom 40 100 20
echo 随机字符串:%randomStr%
for %%i in (%randomStr%) do echo %%i
pause&exit

REM 方法:获取单一随机数 call :getSingleRandom 最小值 最大值 随机数个数
:getSingleRandom
set "n=%~3"
set "randomStr= "
	:loop
	set /a "a=%random%%%(%~2-%~1+1)+%~1"
	call set "newStr=%%randomStr:%a%=%%"
	if "%newStr%" equ "%randomStr%" (
		set "randomStr=%randomStr% %a%"
		set /a "n-=1"
	)
if "%n%" neq "0" goto :loop
goto :eof
复制代码

@echo off
for /l %%a in (40,1,100) do (
    call :f %%a
)
for /f "usebackq tokens=2 delims==" %%i in (`set #`) do (
    echo %%i
)
pause
goto :eof

:f
set n=%random%
if defined #%n% goto :f
set #%n%=%~1
goto :eof
pause
复制代码

@echo off
setlocal enableDelayedExpansion

rem 1..10
for /l %%a in (1,1,10) do (
    set _%%a=x%%a
)
echo   sequences
for /l %%a in (1,1,10) do (
    echo !_%%a!
)

rem 随机
for /l %%a in (1,1,9) do (
    call :f %%a 10
)
echo   random
for /l %%a in (1,1,10) do (
    echo !_%%a!
)
goto :END

:f
set /a n=%random%%%(%2-%1+1)+%1
if %n%==%1 goto :eof
set t=!_%n%!
set _%n%=!_%1!
set _%1=%t%
goto :eof


:END
复制代码

powershell -c "40..100 | Sort-Object {return Get-Random}"
复制代码

powershell -c "40..100 | Sort-Object {return Get-Random} | Select-Object -First 10"
复制代码