Создайте проект для нахождения максимального и минимального элементов двумерного массива. Используйте процедуру, аргументом которой является массив, результатом- два искомых числа.

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!procedure MaxMin(m:array[,] of integer; var mx,mn:integer);begin  var s:=m.ElementsByRow;  (mx,mn):=(s.Max,s.Min)end;begin  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');  Writeln('*** Исходный массив ***');  var a:=MatrRandom(m,n,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');  var max,min:integer;  MaxMin(a,max,min);  Writeln('Max=',max,', min=',min)end.