Предмет: Информатика,
автор: simign0
ДАЮ МНОГО БАЛЛОВ!!! написать программу которая находит среднее арифметическое элементов массива, состоящая из 100 элементов вещественного типа данных, вводимых вручную
MupoTBopec:
Какой язык программирования?
Looks like pascal
Ответы
Автор ответа:
0
Const N = 100;
var
mas : array [1..N] of real;
sum : real := 0;
counter : integer := 0;
begin
for var i := 1 to N do begin
readln(mas[i]);
sum += mas[i];
counter += 1;
end;
writeln(sum/counter);
end.
Интересные вопросы
Предмет: Французский язык,
автор: chikunovadi
Предмет: Алгебра,
автор: mazinadachenka
Предмет: Геометрия,
автор: lol228228228228228
Предмет: История,
автор: Аноним
Предмет: Математика,
автор: Didosik31