中信建投安卓版2.2.0:PASCAL中怎么求平均数

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/27 19:57:18

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个数然后求和,除以个数