Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Помогите,пожалуйста, с задачей по паскаль :
Дан массив размера N. Найти и вывести на экран средний элемент массива.

Ответ оставил Гость

// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
  Writeln(Ср.знач.=,
    ArrRandom(ReadInteger(n=),1,50).Println.Average)
end.

Тестовое решение:
n= 15
46 24 35 34 48 18 34 7 12 5 22 14 2 4 43
Ср.знач.=23.2