Спо паскаль : дан массив размера n. найти и вывести - вопрос №4953017 от 228эрагон 22.05.2023 06:52

Question

Информатика: Спо паскаль : дан массив размера n. найти и вывести на экран средний элемент массива.

228эрагон · Answer

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