RosettaCodeData/Task/Sort-an-integer-array/Modula-3/sort-an-integer-array.mod3
2023-07-01 13:44:08 -04:00

9 lines
170 B
Text

MODULE ArraySort EXPORTS Main;
IMPORT IntArraySort;
VAR arr := ARRAY [1..10] OF INTEGER{3, 6, 1, 2, 10, 7, 9, 4, 8, 5};
BEGIN
IntArraySort.Sort(arr);
END ArraySort.