Вопрос по информатике:
Вычислить среднее арифметическое отрицательных элементов вектора Q(21)
p.s.через программу паскаль
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 11.05.2017 23:27
- Информатика
- remove_red_eye 8227
- thumb_up 18
Ответы и объяснения 1
Const n=21;
var q:array[1..n] of integer;
i,s,k:integer;
begin
Randomize;
for i:=1 to n do
begin
q[i]:=random(51)-10;
write(q[i]:4);
end;
writeln;
k:=0; s:=0;
for i:=1 to n do
if q[i]<0 then begin s:=s+q[i]; k:=k+1; end;
writeln('Среднее арифметическое отрицательных элементов = ',s/k);
end.
Пример:
16 -1 -7 5 13 11 -2 -10 36 19 3 34 23 29 12 28 9 39 33 16 -6
Среднее арифметическое отрицательных элементов = -5.2
- 12.05.2017 00:36
- thumb_up 14
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.