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

0 голосов
28 просмотров

Помогите,пожалуйста, с задачей по паскаль :

Дан массив размера N. Найти и вывести на экран средний элемент массива.


Информатика (15 баллов) | 28 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

// 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

(142k баллов)