pascalabcnet/TestSuite/TakeLast.pas

3 lines
81 B
ObjectPascal
Raw Permalink Normal View History

2020-03-21 20:53:02 +03:00
begin
Assert(Arr(1, 2, 3, 4).Order.TakeLast(2).SequenceEqual(Arr(3,4)))
end.