Написать программу на Паскале, где пиксели рисунка закодированы числами (обозначающими цвет) в виде матрицы, содержащей N строк и M столбцов. Выполните отражение рисунка сверху вниз:

Пример

n = 2m = 5132 115 134 102 21 108 17 210 3 59 108 17 210 3 59 132 115 134 102 21

//PascalABC.NET 3.1 сборка 1219procedure PrintMatrix(a: array[,] of integer);begin    for var i := a.GetLowerBound(0) to a.GetUpperBound(0) do     begin        writeln;        for var j := a.GetLowerBound(1) to a.GetUpperBound(1) do            write(a[i, j], ' ');    end;    writeln;end;begin    var a := MatrixRandom(ReadInteger('n ='), ReadInteger('m ='), 0, 255);    PrintMatrix(a);        for var i := a.GetLowerBound(0) to (a.GetUpperBound(0) div 2) do        for var j := a.GetLowerBound(1) to a.GetUpperBound(1) do            swap(a[i, j], a[a.GetLowerBound(0) + a.GetUpperBound(0) - i, j]);                PrintMatrix(a);end.