[其他] 随机数问题

chouxia

现在需要一段代码来取随机数，
set max=
set min=
set n=
......
取max到min之间的数，取N个数。N小于max-min。数字不能相同
求代码  拜谢

xczxczxcz

$min, $max, $n = -999999, 999999, 30; # 6位数。
((get-random -input ($min..$max) -count $n)|sort) -join ' ';
cmd /c pause
复制代码

Aub

@echo off
Set v=0
Set max=%RANDOM%
Set /a ma=!max!+0
Set min=%RANDOM%
Set /a mi=!min!+0
Set /a c=!min!-1
Set /a d=!max!+1
if /i d>=c Set /a min=!d!+0&&Set /a max=!c!+0
set /a n=!RANDOM!%%!max!+!min! 
Set /a a=!RANDOM!%%!max-2!+!min-3! 
goto 1
:1
Set /a b=!RANDOM!%%!a!+!min-2! 
Set /a a=!b!+0
echo b
Set /a v=!v!+1
if /i v<n goto 1
pause
复制代码

bat,ANSI

went

回复 16# Aub


    获取的数字太多就没法了,字符串长度不够,会闪退

Aub

回复 8# went

    set "max=100"
    set "min=40"
    set "n=20"
复制代码

???

    set max=100
    set min=40
    set n=20
复制代码

就行了

Aub

回复 11# went


    每个至少6位数

Aub

回复 8# went


    标签后不用空格

Aub

回复 13# went


    你用DOS命令衡量Python

went

回复 12# Aub

看不懂Python...

Aub

回复 11# went


   

4# Aub

went

回复 9# Aub


字符串长度有限,n值不能过大
你测试的数据是啥

Aub

回复 7# netdzb


    又写错了，现在改了一下

Aub

回复 8# went


重复了

went

@echo off
set "max=100"
set "min=40"
set "n=20"
REM 空格不能去掉
set "str= "
:loop
	set /a "a=%random%%%(%max%-%min%+1)+%min%"
	call set "newStr=%%str:%a%=%%"
	if "%newStr%" equ "%str%" (
		REM 不重复,添加进字符串
		set "str=%str% %a%"
		set /a "n-=1"
	)
if "%n%" neq "0" goto :loop
REM 拼接成了字符串,用for自己截取数字即可
echo %str%
pause&exit
复制代码

保存为bat,ANSI编码

netdzb

回复 4# Aub

学习一下你的代码。