Ну Вы же сами сказали, что необходимо сделать из двухмерного массива одномерный smile.gif.
Думаю будет это примерно так.
Код

const
  N=5;
  M=3;

var
  da:array[1..N, 1..M] of integer;
  oa:array[1..N*M] of integer;
---

for i:=1 to N do
  for j:=1 to M do
    oa[(i-1)*M+j]:=da[i,j];