Как вывести двумерный массив?

Обычно двумерные массивы выводятся на экран в табличной форме, или поэлементно. Во втором случае в каждой строке находиться одно значение, перед которым указано название массива, а в скобках индексы элементов.

Программа для вывода двумерного массива в виде таблицы

{$CODEPAGE UTF8}
program Print2dArray;
const
  rowCount = 4; {количество строк}
  colCount = 6; {количество столбцов}
var
  arr : array [1..rowCount, 1..colCount] of integer;
  row, col : integer;
begin
  randomize;
  {заполнение массива случайными числами}
  for row := 1 to rowCount do
    for col := 1 to colCount do
      arr[row, col] := random(100);

  writeln('Печать массива');
  for row := 1 to rowCount do
    begin
      for col := 1 to colCount do
        write(arr[row, col]:4);
      writeln;
    end;
  readln;
end.  

Результат табличного вывода массива в консоль

Вывод массива по одному элементу в строке, с названием массива и значениями индексов

  writeln('Печать массива');
  for row := 1 to rowCount do
    for col := 1 to colCount do
      writeln('A[', row,', ', col, '] =', arr[row, col]:4);

Результат поэлементного вывода массива в консоль