Составьте программу, которая формирует массив, содержащий 18 случайных чисел, принадлежащих промежутку [2; 9], и подсчитывает сумму положительных элементов. для результата использовать форматный вывод. p.s. буду !

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(18, 2, 9);

 a.Println;

 WriteFormat('S = {0:###}', a.Where(t -> t > 0).Sum)

end.

5 7 8 4 3 3 9 8 7 5 6 9 8 7 2 7 8 4S = 110