Написать , которая будет находить сумму минимального - вопрос №7892008 от Arinacoco 02.01.2022 15:34

Question

Информатика: Написать , которая будет находить сумму минимального и максимального массива

Arinacoco · Answer

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
Writeln('Мин+Макс=',a.Min+a.Max)
end.

Пример
n= 13
15 11 89 -28 -72 90 93 -4 -99 75 39 80 39
Мин+Макс=-6