Задание 4 Вариант 1 Самостоятельная работа 5 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Ниже вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:

4. Напишите программу. Рост учеников класса представлен в виде массива. Рост девочек представлен положительными числами, а рост мальчиков — отрицательными. Определите средний рост мальчиков.

Пусть в классе 20 учеников. Запишите исходные данные и полученный результат:

Результат:..........

program s5_v1_4;

const

n = 20;

var

a: array[1..n] of integer;

i, k, s: integer;

sr: real;

begin

writeln(taskВвод массиваtask);

for i := 1 to n do

readln(a[i]);

s := 0; k := 0;

for i := 1 to n do

if a[i]

begin

s := s + abs(a[i]);

k := k + 1

end;

sr := s / k;

writeln(tasksr=task, sr:3:2)

end.

Результат: 53.44