Question

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

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

Answer 1

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

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

Answer 2

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

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

Answer 3

i:=random(100)+1;

Answer 4

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