Sorting algorithms/Counting sort: Difference between revisions
Content deleted Content added
Modula-3 |
mNo edit summary |
||
Line 161: | Line 161: | ||
IMPORT IO, Fmt; |
IMPORT IO, Fmt; |
||
VAR test := ARRAY [ |
VAR test := ARRAY [1..8] OF INTEGER {80, 10, 40, 60, 50, 30, 20, 70}; |
||
PROCEDURE Sort(VAR a: ARRAY OF INTEGER; min, max: INTEGER) = |
PROCEDURE Sort(VAR a: ARRAY OF INTEGER; min, max: INTEGER) = |