Как создать динамическую матрицу n*m - Pascal

Формулировка задачи:

Помогите с созданием динамической матрицы. n и m вводятся пользователем. как описать?

Решение задачи: «Как создать динамическую матрицу n*m»

Листинг программы

type
  mas=array[1..100] of real;
  matr=array[1..1] of mas;
var
  x:^matr;
  i,j,n,m:integer;
begin
  writeln('N');
  readln(n);
  writeln('M');
  readln(m);
  for i:=1 to n do
    new(x);
  for i:=1 to n do
    for j:=1 to m do
      read(x^[i,j]);
    writeln('                                        Њ*ваЁж*');
    for i:=1 to n do
      begin
        for j:=1 to m do
        write(x^[i,j]:6:2,'');
        writeln;
      end;
 
end.

Объяснение кода листинга программы

Этот код на языке Pascal создает динамическую матрицу размером nm, где n - количество строк, а m - количество столбцов. В начале объявляются две переменные типа mas: одна для хранения матрицы, а другая для хранения ссылки на первую строку матрицы. Затем объявляется переменная x типа mas, которая будет использоваться для чтения и записи значений в матрице. Далее, с помощью двух вложенных циклов, происходит чтение значений из матрицы и их запись в соответствующие ячейки. После этого происходит вывод на экран строки ` NваЁж, гдеN- количество строк,ваЁж- символ, обозначающий начало строки, а` - символ, обозначающий начало матрицы. Затем происходит вывод на экран значений каждой ячейки матрицы, разделенных пробелами и переносом строки. В конце кода происходит выход из программы.