pascalabcnet/TestSuite/extensionmethods21.pas

5 lines
139 B
ObjectPascal
Raw Permalink Normal View History

2017-04-23 15:09:31 +03:00
begin
var seq1: sequence of integer;
seq1 := ((ArrGen(5,i->i).Reverse)+(ArrGen(5,i->i+5).Reverse));
assert(seq1.ToArray[0] = 4);
end.