妈妈成为公司老总性奴:PASCAL中怎么求平均数

来源:百度文库 编辑:查人人中国名人网 时间:2024/03/29 13:33:54

program aaa;
var
o,a,b:integer;
begin
o:=0;b:=0;
while not eof do
begin
read(a);
b:=b+a;
o:=o+1;
end;
writeln(b div o);
end.

先读入N个数然后求和,除以个数。
没有特别的函数

PASCAL是什么

用循环语句读入和求和,再除以个数

先读入N个数然后求和,除以个数