回 帖 发 新 帖 刷新版面

主题:有關srand(time(0))

請問pascal 有像c++ srand(time(0)) 的涵數嗎?
即是改變 random 的seed

回复列表 (共2个回复)

沙发


有啊,
randomize

begin
  randomize;
  writeln(random(10));
end;

板凳

randomize(n)还可以指定seed.
还有,在TP中如果不用randomize, 输入输出时会出错.

我来回复

您尚未登录,请登录后再回复。点此登录或注册