@echo off&setlocal enabledelayedexpansion
for /l %%i in (1,1,100) do (call :ran %%i&echo %%i=!%%i!)
pause>nul&exit
:ran
set /a n=%random% %% 101
if %n% equ 0 (goto ran) else (
        if !z%n%! equ 0 (
                if %n% equ %1 (goto ran) else (
                set %1=%n%&set /a z%n%+=1
                )
        ) else (goto ran)
)
goto :eof
复制代码

@echo off & setlocal enabledelayedexpansion
for /l %%i in (1 1 100) do set num%%i=%%i
for /l %%i in (1 1 100) do (
    set /a rnd=100!random:~-2!%%100+1,var=!num%%i!
    call set num%%i=%%num!rnd!%%
    set num!rnd!=!var!
)
for /l %%i in (1 1 100) do echo %%i=!num%%i!
pause>nul
复制代码

@echo off & setlocal enabledelayedexpansion
for /l %%i in (1 1 100) do set num%%i=%%i
for /l %%i in (1 1 100) do (
    set /a rnd=100!random:~-2!%%100+1,var=!num%%i!
    call set num%%i=%%num!rnd!%%
    set num!rnd!=!var!
)
for /l %%i in (1 1 100) do if "%%i"=="!num%%i!" echo %%i=!num%%i!
pause 
复制代码

@echo off & setlocal enabledelayedexpansion
for /l %%i in (1 1 100) do set num%%i=%%i
for /l %%i in (100 -1 1) do (
    set /a rnd=!random!%%%%i+1,n+=1
    for %%a in (!rnd!) do echo !n!=!num%%a!&set/a num!rnd!=num%%i
)
pause>nul
复制代码

@echo off & setlocal enabledelayedexpansion
for /l %%a in (1,1,100) do set ".!random!-%%a=%%a"
for /f "tokens=2 delims==" %%a in ('set .') do set /p=%%a<nul & echo.
pause>nul
复制代码