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