Ну так в памяти-то одномерный и многомерный массив одинаково хранятся! Объявляем новый тип- динамический одномерный массив. Затем присваиваем адресу нашего динамического массива адрес матрицы и работаем с массивом 
. Например так:
Code
uses crt;
const
n=2;
k=10;
type
g=array[1..2] of word;
LP=^g;
var
M:array[1..n,1..k] of word;
P:LP;
i,j:byte;
begin
ClrScr;
P:=@M;
P^[1]:=1;
P^[2]:=1;
for i:=3 to n*k do
P^[i]:=P^[i-2]+P^[i-1];
for i:=1 to n do
begin
for j:=1 to k do
Write(M[i][j]:5);
WriteLn;
end;
ReadKey;
end.
Можно и не заводить новый тип, а воспользоваться POINTER'ом.
