作业帮 > 综合 > 作业

pascal程序怎样随机产生一个三位数?并解释为什么要这样编写?

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/28 13:09:55
pascal程序怎样随机产生一个三位数?并解释为什么要这样编写?
program ex;
var x:integer;
begin
randomize; {先执行randomize, 才能得到随机整数}
x:=random(900)+100; {random(n)产生0~n-1的随机数}
writeln(x); { random(900)是0-899的随机数,再加上100就是100-999的随机数}
end.