Умоляю, помогите (PascalABC 9 класс).массив состоит из 30 частей,в промежутке от

// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017

begin 
  var a:=ArrRandom(ReadInteger('Введите размер массива-gt;'),-2,65); a.Println; 
  Println(a.Where(e-gt;egt;0).Min); 
  Println(a.Where(e-gt;elt;0).DefaultIfEmpty.Max); 
end.

Пример(1):

Введите размер массива-gt; 10
5 22 21 20 40 9 58 57 54 -2
Малое среди положительных: 5 
Наибольшее посреди отрицательных: -2 

Пример(2):

Введите размер массива-gt; 10
26 7 13 60 39 62 24 9 20 11
Малое посреди положительных: 7 
Наибольшее посреди отрицательных: 0