Для каких целей уместно применять такой цикл вывода:

for i:=1 to m do begin

   for j:=1 to n do write(a[i,j]:5);

   writeln;

end;