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

@ПоляМилосветова · Регистрация: 11.09.2012

Author24 — интернет-сервис помощи студентам

Здравствуйте! Помогите пожалуйста решить задачу:

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

Заранее большое спасибо!

@Zhenekk · 23.10.2012, 16:53

Pascal

const
     n=5;
type
    mas=array [1..n] of integer;
var
   a:mas;
   i: integer;
   k:real;
begin
randomize;
for i:=1 to n do
    begin
    a[i]:=random(51);
    write(a[i]:4)
    end;
    writeln;
k:=(a[1]+a[2]+a[3]+a[4]+a[5])/5;
writeln('среднее арифметическое:',k);
readln
end.

@ПоляМилосветова 0 / 0 / 0 Регистрация: 11.09.2012 Сообщений: 8
		1
	Ввести массив из 5 элементов, найти среднее арифметическое всех элементов массива. 23.10.2012, 16:17. Показов 13126. Ответов 1 Метки нет (Все метки) Здравствуйте! Помогите пожалуйста решить задачу: 1)Ввести массив из 5 эл.,найти ср.арифметическое всех элементов массива. Заранее большое спасибо! 0

	23.10.2012, 16:53

Опции темы

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

Решение