Среднее арифметическое (обозначим как SA) всех значений элементов массива подсчитывается по формуле:
SA = S / К,
где S – это сумма всех элементов, K – количество просуммированных элементов. Алгоритмы поиска суммы и количества элементов были подробно рассмотрены в п/п 2.2.3.1. Но в тех случаях, когда SA находят только среди элементов, удовлетворяющих некоторому условию, следует учитывать тот факт, что таких элементов в массиве может и не быть, и тогда К = 0. Чтобы избежать деления на 0, необходимо при получении значения SA осуществлять соответствующую проверку: К > 0. На рис. 9 приведена блок-схема алгоритма поиска SA положительных элементов и фрагмент программы.
Среднее геометрическое значений массива (обозначим через SG) вычисляется по следующей формуле:
SG = KÖ P,
где Р – произведение элементов массива, K – количество элементов. Аналогично, как и в алгоритме поиска SА элементов, удовлетворяющих некоторому условию, необходимо учитывать вариант К = 0. На рис. 10 приведена блок-схема алгоритма поиска среднего геометрического отрицательных элементов массива и соответствующий фрагмент программы.
…
S:= O;
K := 0;
for i:=1 to N do
if a[i]> 0 then
Begin
S := S + A[i];
K := K +1;
end;
if K > 0 then
begin
SA := S/K;
writeln (‘ SA= ‘, SA);
end
else
writeln(‘ K = 0 ‘);
… *
Рис. 9
…
P:= 1;
K := 0;
for i:=1 to N do
if A[i]< 0 then
Begin
P := P* A[i];
K := K +1;
end;
if K > 0 then
begin
SG := EXP(1/K * LN(P)) ;
writeln (‘ SG= ‘, SG);
end
else
writeln(‘ K = 0 ‘);
…
Рис. 10
