В произвольном массиве А(15) на интервале (-50;50), найти наибольший элемент.
В произвольном массиве А(15) на интервале (-50;50), найти наибольший элемент.
Ответ(ы) на вопрос:
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
Writeln('max=',ArrRandom(15,-50,50).Println.Max)
end.
Тестовое решение:
12 -3 -6 50 -48 16 14 4 24 -9 42 7 20 45 46
max=50
Не нашли ответ?
Похожие вопросы