隨機函數怎麼創建？

Question

R=(s * m) mod n;S是种子，
m 和 n是个常数；
m足够大就行，
n 是 随机函数的范围。 比如 想得到 0~99的随机函数，那么n = 100这个是伪随机函数，种子的选择很重要，如果种子相同，那么得到的随机数列也是相同的。

Answer 1

var i:integer;
begin
 Randomize; //必须有
 i:=Random(100); //返回一个1到100间的随机数
end;

Answer 2

更正错误：
i:=Random(100); //返回一个0到100间的随机数，可以等于0

Answer 3

如果要自己写函数，看看这个文章http://our93611.51.net/upload/showtitle.php?fn=000031.dat