Question

如何创建一个没有任何参数并返回数组的pascal函数？

Answer 1

当时在turbo pascal 7中，我认为它不会改变。

type
 IntArray = array of Integer;

function MyArray():IntArray
begin
  MyArray:=[1,2,3];
end;

Answer 2

program Foo;
type
        TArray = array[0..9] of integer;
function newArray():TArray;
begin
end;

var
        arr:TArray;
begin
        arr:= newArray();
end.

Pascal：如何在没有参数的情况下编写函数？

2 个答案: