Необходимо обявить тип массива:
Код:
type
Tk = array[1..50, 1..100, 1..150] of Double;
Этот тип использовать в объявлении параметров процедуры, обрабатывающей массив, а так же при объявлении переменной, содержащей значения массива.
Код:
var
k : Tk;
или
const
k : Tk = (...);
...
procedure zzz(kk : Tk);
begin
end;
...
zzz(k); //вызов
P.S. Тип Real применять не рекомендуется. Вместо него использовать тип
Double