Задание 8 Вариант 1 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Решение #1
Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
8. Напишите программу вычисления среднего арифметического положительных элементов массива. Проверьте работу программы на заданном массиве А = {7, 25, 4.5, 0, 17, 61, -10, 0, 1, -4, 22}.
Среднее арифметическое положительных элементов равно.
program s4_v1_8;
var
a: array[0..10] of real;
i, k: integer;
s,sr: real;
begin
s := 0; k := 0;
writeln('ввод массива');
for i := 0 to 10 do
begin
read(a[i]);
if a[i] > 0 then
begin
s := s + a[i];
k := k + 1
end;
end;
sr:=s/k;
writeln('среднее арифметическое положительных =', sr:6:2);
end.
Среднее арифметическое положительных элементов равно: 19.64
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением
