составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементов

program mas;

var ...

...

Question

Информатика

Александрушка

12 июля, 18:04

составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементов

program mas;

var ...

...

+2

Ответы (1)

Знаете ответ на вопрос?

Ксюта · Answer 1

var

mas:array[1 ... 5] of integer;

i, sum:integer;

sr:real;

begin

for i:=1 to 5 do

begin

readln (mas[i]) ; / / заполняем массив

sum:=sum+mas[i]; / / находим сумму элементов массива

end;

sr:=sum/5; / / находим среднее арифметическое

writeln (sr) ;

end.

составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементовprogram mas;var ......

составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементов

program mas;

var ...

...