本文目录
- 关于电脑随机抽取数字的程序
- 需要一款抽号软件，可以滚动抽随机数的，抽号范围要可以随机设置，谢谢
- 随机数生成器1到100不重复抽取30+哪个数概率最低
- 电脑随机抽取数字的程序
关于电脑随机抽取数字的程序
http://www.skycn.com/soft/37441.html 你点开这个网址，下面有下载地址，下载下来就可以用了 这是随机抽取器 v1.3
需要一款抽号软件，可以滚动抽随机数的，抽号范围要可以随机设置，谢谢
可以试一下这款随机数软件，是我自己做的，有六种抽取模式，【滚动模式】可以满足你的需求。同时界面也很好看，采用可切换Win8风格，设计也非常人性化。希望你喜欢。
随机数生成器1到100不重复抽取30+哪个数概率最低
咨询记录 · 回答于2021-09-24
随机数生成器1到100不重复抽取30+哪个数概率最低
如果是真正的随机数的话，每个数被抽取到的概率相等。如果是由计算机生成的伪随机数的话，跟生成伪随机数的算法有关系，这种情况下，需要知道伪随机数的算法，才能输出哪个数概率最低。
电脑随机抽取数字的程序
你需要随机抽取1～100中的数字100个，实际上你已经把数字收取完了，只是随机排序的问题，可以用数组来实现，第一次产生一个1～100的随机数，把这个数交换到数组第1个位置，第二次产生2～100的随机数交换到第二个位置，直到最后产生100～100的随机数，下面是我写的例子程序： {$apptype console} program exp; var a:array[1..100] of 1..100; i,j,k:integer; begin randomize; for i:=1 to 100 do a[i]:=i; for i:=1 to 100 do begin j:=random(100-i+1)+i; if j《》i then begin k:=a[i];a[i]:=a[j];a[j]:=k; end; end; for i:=1 to 100 do write(a[i]:4); end. 此程序在DELPHI下运行成功，结果如下： E:\ygb》dcc32 b.dpr Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation b.dpr(14) 15 lines, 0.05 seconds, 10724 bytes code, 1905 bytes data. E:\ygb》b.exe 66 33 17 83 67 88 85 78 92 93 82 13 80 22 11 24 46 64 97 75 54 70 55 49 5 40 23 45 6 62 4 29 47 71 10 99 14 25 48 3 20 58 42 41 15 1 7 19 100 34 2 18 30 53 26 38 44 37 9 61 73 96 95 39 68 31 72 79 59 86 16 57 8 51 89 50 28 87 81 36 69 77 65 91 56 76 60 84 63 21 12 94 74 90 98 27 43 52 32 35 E:\ygb》b.exe 63 1 44 40 68 46 77 93 58 39 52 14 51 96 71 26 100 84 25 56 94 83 55 65 16 66 88 18 27 4 80 38 69 54 92 89 3 9 7 53 28 67 31 19 81 62 24 37 45 10 59 78 20 12 72 48 29 74 36 50 86 42 79 6 41 75 76 73 5 95 8 61 85 87 23 32 99 15 82 33 57 49 98 17 47 11 30 22 34 35 64 70 91 43 2 60 21 13 90 97