10 lines
144 B
ObjectPascal
10 lines
144 B
ObjectPascal
function Test(params a : array of integer) : integer;
|
|
begin
|
|
Result := a[0]+a[1];
|
|
end;
|
|
|
|
var t : integer := Test(1,2);
|
|
|
|
begin
|
|
assert(t=3);
|
|
end. |