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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10

var 
    //объявляем массив
	mas: array[0..5, 0..9] of integer;
    i: integer;
begin
	//заполняем массив случайными числами
    for i:= 0 to 5 do
    for j:= 0 to 9 do
		mas[i, j]:= ramdom(10);	
end;

1
2

var
  myArray: array [1..n, 1..m] of Integer;

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21

program TwoDimensionalArray;

var
  myArray: array [1..3, 1..4] of Integer;
  i, j: Integer;

begin
  // заполнение массива значениями от 1 до 12
  for i := 1 to 3 do
    for j := 1 to 4 do
      myArray[i,j] := (i-1)*4 + j;
  
  // вывод элементов массива на экран
  for i := 1 to 3 do
  begin
    for j := 1 to 4 do
      write(myArray[i,j], ' ');
    writeln;
  end;
  
end.

1
2
3

1 2 3 4 
5 6 7 8 
9 10 11 12