Delphi Функции

[world12_tk]

Прости меня за глупый вопрос, но не где не могу найти ответ.
Скажите можно ли функции возвращать значение массива и если можно то как оно делается.
Вот попробывал с компилировать такой пример и мне дают отказ:

Function FoactorCalculationC(delta,lambda:mas1):mas1;
var
  i:integer;
begin
  for i:=1 to 3 do
   Result[i]:=delta[i]/lambda[i];
end;

[world12_tk]

и вот назрел еще вопрос. если можно в функцию возвращать значение массива, то можно ли эту функцию делать динамическую. просто у меня delta и lambda динамические массивы

[raxp]

type tmas = record
 t: array of extended;
end;

Function FoactorCalculationC(delta,lambda: tmas): tmas;
var
  i:integer;
begin
  for i:=low(delta.t) to high(delta.t) do // разумеется delta,lambda равной длины иначе смысла нет или нужна проверка
   Result.t[i]:= delta.t[i]/lambda.t[i];
end;

procedure TForm1.SpeedButton1Click(Sender: TObject);
var delta, lambda, z: tmas;
i: integer;
begin
 setlength(delta.t, 3); // как пример установим
 setlength(lambda.t, 3);
 setlength(z.t, 3);

 for i:= low(delta.t) to high(delta.t) do begin
 delta.t[i]:= 3;
 lambda.t[i]:= i
 end;

 z:= FoactorCalculationC(delta, lambda);
...

смысл ясен?

[psycho-coder]

Да можно

Result[i] := delta[i] / lambda[i];

Вернет результат деления итых элементов двух массивов, а у Вас она должна возвращать массив!

2.

FoactorCalculationC(delta,lambda:mas1)

Можно попробовать объявить так

FoactorCalculationC(var delta,lambda:mas1)

Тогда можно работать со ссылками на массивы))
Получать размеры массивов можно так

LenDelta := High(delta);
LenLambda := High(lambda);