Создайте двумерный массив X, имеющий четыре строки и три столбца и найдите в нем максимальный по абсолютному значению элемент, а также укажите номер строки и столбца, содержащие этот элемент. Язык Паскаль.

const  m = 4;  n = 3;var  a: array[1..m, 1..n] of integer;  i, j, im, jm, mx, e: integer;begin  Randomize;  mx := -1000;  for i := 1 to m do   begin    for j := 1 to n do     begin      a[i, j] := Random(100) - 50;      e := abs(a[i, j]);      if mx < e then begin        mx := e; im := i; jm := j      end;      write(a[i,j]:4)    end;    writeln  end;  writeln;  writeln('Максимальный по модулю элемент a[', im, ';', jm, ']=', mx)end.Тестовое решение: -12 -36 -41   7 -45  12 -23  48   0  -1  31  14Максимальный по модулю элемент a[3;2]=48