pascalabcnet/TestSuite/TakeLast.pas
2020-03-21 20:53:02 +03:00

3 lines
81 B
ObjectPascal

begin
Assert(Arr(1, 2, 3, 4).Order.TakeLast(2).SequenceEqual(Arr(3,4)))
end.