RosettaCodeData/Task/Sort-an-integer-array/Modula-3/sort-an-integer-array.mod3

10 lines
170 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
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.