SetLength 16*16

[mutabor]

Кстати, метод, к-рый привел VovanZ, пригодится когда нужна непрямоугольная матрица (бывают и такие). Или некубический куб

[eoln]

Сообщение от VovanZ

А разве в делфи функция SetLength поддерживает двумерные массивы?
Я всегда думал, что надо делать вот так:

//...............................................
SetLength(a, 16);
for i:=1 to 16 do SetLength(a[i], 16);
//...............................................

Такое тоже применяется для ступенчатых матриц

var
  a: array of array of byte;
  k, i, j: byte;
begin
  randomize;
  SetLength(a, 16);
  for i:=0 to 15 do SetLength(a[i], random(5) + 1);
  k := 1;

  for i := 0 to 15 do begin
    for j := 0 to length(a[i]) - 1 do
    begin
      a[i, j] := k;
      write(a[i, j]:3);
      inc(k)
    end;
    writeln
  end;
  readln
end.

Опоздал, mutabor опередил

[Utkin]

Сообщение от mutabor

А по-моему путаницы нет никакой. Это уже настолько привычно, что путаница как раз когда с единицы начинается. Бывает что нужно именно с единицы, например в библиотеке Фурье преобразований я встречал такое, так там на видном месте большими буквами об этом написали, чтобы бедные программисты потом отладчик не мучали

Путаница есть, SetLength позволяет задавать длину строки, а там нумерация идет от единицы.

[mutabor]

Сообщение от Utkin

Путаница есть, SetLength позволяет задавать длину строки, а там нумерация идет от единицы.

Ну как бы все дельфийцы в курсе, что строки с единицы. Хотя если рассматривать самое начало обучения, то возможно это и покажется странным и первые разы будешь путаться, но не более того.

p.s. Кстати я бы посоветовал всем новичкам в Дельфи, кто еще не читал, почитать про внутреннее устройство строк, очень помогает и снимает кучу вопросов и ошибок в дальнейшем.