Составить в массив 12 чисел и вывести сумму максимального и минимального значения

// PascalABC.NET 3.1, сборка 1171 от 15.02.2016
begin
  var a:=ReadArrInteger('->',12);
  Writeln('min+max=',a.Min+a.Max)
end.

Тестовое решение:
-> 6 -3 8 11 3 0 14 -5 8 2 7 1
min+max=9