Io ho provato a fare così, ma mi sà che non va. praticamente ho caricato in un vettore "vet" tutti gli elementi della matrice e poi proseguo in questo modo:
codice:
 for x:=1 to n do       //n numero di righe
 for y:=1 to m do     //m  numero di colonne
 for k:=1 to num do     // dove  num è = m*n
 begin
 a[x,y]:=vet[num];
             writeln('matrice ');
             for q1:=1 to n do
                             begin
                             writeln();
             for q2:=1 to m do
                             write(' | ',a[q1,q2]);
                             end;      
 end;