Дана матриця цілих чисел розміром 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.

uses crt; var a,b,c,min: integer; beginwriteln('введи три числа: '); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln('наименьшее из этих чисел:   ',min); readln; end.

часть схемы, информацию - канал.