Ввести с клавиатуры массив из 5 элементов, найти среднее арифметическое всех элементов массива.

Пример:

Введите пять чисел:

4 15 3 10 14

среднее арифметическое 9.200

Question

Информатика

Иоанн

28 марта, 04:59

Ввести с клавиатуры массив из 5 элементов, найти среднее арифметическое всех элементов массива.

Пример:

Введите пять чисел:

4 15 3 10 14

среднее арифметическое 9.200

+3

Ответы (2)

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

Ксанфиппа · Answer 1

Var a:array[1 ... 5] of integer; i:integer; m, z:real;

begin

for i:=1 to 5 do

begin

readln (a[i]) ;

m:=m+a[i];

end;

z:=m/5;

writeln (z) ;

end.

Манятка · Answer 2

Progran gt;

var a:array[1 ... 5] of real;

s:real;

i:integer;

begin

s:=0;

for i:=1 to 5 do

begin

read (a[i]) ;

s:=s+a[i];

end;

s:=s/5;

writeln (s) ;

end.

Ввести с клавиатуры массив из 5 элементов, найти среднее арифметическое всех элементов массива.Пример:Введите пять чисел:4 15 3 10 14среднее арифметическое 9.200

Ввести с клавиатуры массив из 5 элементов, найти среднее арифметическое всех элементов массива.

Пример:

Введите пять чисел:

4 15 3 10 14

среднее арифметическое 9.200