Sorting algorithms/Insertion sort: Difference between revisions
Content added Content deleted
Deadmarshal (talk | contribs) (Added Oberon-2) |
Deadmarshal (talk | contribs) |
||
Line 3,856: | Line 3,856: | ||
VAR |
VAR |
||
⚫ | |||
A1:ARRAY 10 OF INTEGER; |
A1:ARRAY 10 OF INTEGER; |
||
Line 3,880: | Line 3,879: | ||
PROCEDURE PrintArray(VAR A:ARRAY OF INTEGER); |
PROCEDURE PrintArray(VAR A:ARRAY OF INTEGER); |
||
⚫ | |||
BEGIN |
BEGIN |
||
FOR i := 0 TO LEN(A)-1 DO Out.Int(A[i],0); Out.Char(' ') END; |
FOR i := 0 TO LEN(A)-1 DO Out.Int(A[i],0); Out.Char(' ') END; |