Дан массив из 10 чисел. составьте программу,которая выводит два самых больших по модулю элемента этого массива. дан массив названия месяцев. составьте программу,которая выводит на экран названия ,включающие объекты "а" и "д".

PascalABC.NET 3.2, сборка 1374 от 10.01.2017
Внимание! Если программа не работает, обновите версию!

Задание 1

begin
  var a:=ArrRandom(10,1,50); a.Println;
  a.SortedDescending.Take(2).Println
end.

Пример
14 5 27 6 37 5 19 3 39 31
39 37

Задание 2

begin
  var a:=Arr('январь','февраль','март','апрель','май','июнь',
    'июль','август','сентябрь','октябрь','ноябрь','декабрь');
  a.Where(w->('а' in w) and ('д' in w)).Println
end.

Результат
декабрь