Дана матриця цілих чисел розміром 5x3. Замінити всі негативні елементи матриці на нулі. Вивести вміст матриці до обробки і після обробки. На мові Паскаль

--- PascalABC.NET 3.6.2 ---

begin

 var A := MatrRandom(5, 3, -99, 99);

 A.Println;

 println('=============================='); //Разделитель для консоли.

 A.Transform(p -> p < 0 ? 0 : p);

 A.Println;

end.

надо проверить 4 ключа

x=16

ответ: 16 этажей