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

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

3. Напишите программу. Известны данные о расходе электроэнергии N предприятиями отрасли за год. Определите средний расход электроэнергии по отрасли.

Для N = 10 запишите исходные данные и полученный результат:

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

program s5_v1_3;

const

n = 10;

var

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

i: integer;

s, sr: real;

begin

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

randomize;

for i := 1 to n do

begin

a[i] := random * 100;

write(a[i]:3:2,task task)

end;

s := 0;

for i := 1 to n do

s := s + a[i];

sr := s / n;

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

end.

Результат: 46.61