作业帮 > 综合 > 作业

PASCAL 编程 让电脑产生10个随机数,然后在输出他们的和,平均数,最大数和最小数.

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/10/12 12:31:47
PASCAL 编程 让电脑产生10个随机数,然后在输出他们的和,平均数,最大数和最小数.
PASCAL 编程 让电脑产生10个随机数,然后在输出他们的和,平均数,最大数和最小数.
var max,min,i,a,sum:longint;
begin
randomize;
max:=-maxlongint;
min:=maxlongint;
sum:=0;
{以上四行为初始化}
for i:=1 to 10 do
begin
a:=random(100);{随机产生一个0—99的自然数}
if a>max then max:=a;{如果输入数据比当前最大值大,那么将当前最大值更新为该数据}
if a