檢舉|2010-05-08 09:41你的樣子20 | 分類：其他程式語言 | 瀏覽6314次
怎樣產生隨機數 條件是 1.這些隨機數每個都不同（5個數吧） 2.隨機數的範圍在1到35之間 我要把他們顯示在 memo1 中 怎麼顯示呢 謝謝大俠們了 回答好了 加 50
procedure tform1.button1click(sender:tobject);
vars:string;
begin
randomize;
memo1.lines.clear;
while memo1.lines.count<5 do begin
s := inttostr(random(35)+1);
if memo1.lines.indexof(s)<0 then
memo1.lines.add(s);
end;
end;
產生隨機數
先說明一下rand，這個函式用來產生偽隨機數。比如，產生1000的兩個隨機數，產生的兩個一般上是不同的，但如果要產生80個100以內的隨機數，僅用rand函式就不夠。因為產生80個100以內的隨機數，至少有兩個數相等的概率太大了 srand函式，並不能使產生的隨機數完全不同。你可以執行以下這串 in...
隨機數產生
c c 中取隨機數 在計算機中並沒有乙個真正的隨機數發生器，但是可以做到使產生的數字重複率很低，這樣看起來好象是真正的隨機數，實現這一功能的程式叫偽隨機數發生器。有關如何產生隨機數的理論有許多，如果要詳細地討論，需要厚厚的一本書的篇幅。不管用什麼方法實現隨機數發生器，都必須給它提供乙個名為 種子 的...
產生隨機數
一 normrnd r normrnd mu,sigma r normrnd mu,sigma,m,n,r normrnd mu,sigma,m,n,mu sigma可以是向量或矩陣 二者同為矩陣時size要相同 但必須和r的size相同 行 列 r的size可以不指定，也可以用m，n指定 n1 n...