pascal randomize随机产生1~100的整数

随即产生1~100的整数这个语句怎么写...

2026年09月22日 06:02

有4个网友回答

网友（1）：

var
n:integer;
begin
randomize;
n:=random(100)+1;
writeln(n);
end.

randomize是随机函数初始化过程
random(100)产生0~99的随机整数
random(100)+1产生1~100的随机整数

网友（2）：

开头打一个randomize;
然后中间打一个像x:=random(99)+1;或
write(random(99)+1);(或其他）就行

总之是random(99)+1;!!!!

网友（3）：

i:=random(100)+1;

网友（4）：

先在Begin后面打一个 randomize; 以初始化随机函数生成器
然后可以用赋值语句来产生随机数。
例：
n:=random(100); 这代表随机生成一个0～99 的数。
所以你应该用 n:=random(100)+1