一个关于pascal的简单编程问题?答对了有追加分

来源:百度知道 编辑:UC知道 时间:2024/05/21 15:26:14
我用turbo pascal 7.0编一个随机输出100次0-100的值时(用Random(100)),为什么值总是0 3 86 20 27 67 31 16.....这些(每次都是),为什么不是随机产生的其它值,输1000,10000也是一样的这样,有哪位大侠能给我解释一下?我有追加分.

调用random前先调用一下randomize

我给说详细点吧

randomize是一个 随机化 种子 ,只有 加了 它 你 输出 才有可能 每次 运行 都随机,我要 最佳!!!

代码如下:
program t1;
var
i:longint;
begin
randomize;
for i:=1 to 100 do
begin
write(random(100),' ');
end;
end.

在random调用之前,加一个randomize;
这样每次都会随机产生不同的数
否则每次都一样的

初始化!!
加randomize!!