Question

в массивах хранятся заработные платы работников предприятия посчитать среднюю заработную плату учитывая что работник работать

Answer 1

program gt;
var n,i:integer;
a,s:real;
begin
read(n);
for i:=1 to n do
begin
read(a);
s:=s+a;
end;
s:=s/n;
writeln(s);
end.
n-кол-во работников
после этого зарплата каждого работника вводится внутри цикла for