Data update
This commit is contained in:
parent
8e4e15fa56
commit
72eb4943cb
1853 changed files with 35514 additions and 9441 deletions
10
Task/JortSort/PascalABC.NET/jortsort.pas
Normal file
10
Task/JortSort/PascalABC.NET/jortsort.pas
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
##
|
||||
function jortsort<T>(Self: sequence of T): boolean;
|
||||
extensionmethod;
|
||||
begin
|
||||
result := Self.SequenceEqual(Self.sorted);
|
||||
end;
|
||||
|
||||
(1..10).jortsort.println;
|
||||
[1,2,3].jortsort.println;
|
||||
'abcdefgc'.jortsort.Println;
|
||||
Loading…
Add table
Add a link
Reference in a new issue