вывести массив ровно

[rev1ver]

помогите, пожалуйста
есть двумерный массив с числами: большими и маленькими. надо его вывести так, чтобы во всех столбцах первая цифра каждого следующего элемента была точно под цифрой текущего элемента столбца, то есть чтобы всё было красиво) заранее спасибо

[pomoshnic]

Uses crt;
...
For x:=1 to 5 do
For y:=1 to 5 do
Begin
GotoXY(x*4,y*4);
Write(a[x,y]);
End;
...

[puporev]

Вообше-то матрицу выводят выравнивая числа по последней цифре, т.е.
. 1223....12
11111...111
.. 222....22
Это далается так.

for i:=1 to n do
   begin
     for j:=1 to n do
     write(a[i,j]:6); //6-количество позиций под число, выбирают от      
      writeln;       //ожидаемой длины числа и пробелов между числами
    end;

[rev1ver]

всем спасибо)