4 lines
128 B
ObjectPascal
4 lines
128 B
ObjectPascal
begin
|
|
var a{@var a: array of integer;@} := ArrGen(10,i->i);
|
|
var a2{@var a2: array of real;@} := ArrGen(10,i->i+2.3);
|
|
end. |