Поразрядная сортировка - Free Pascal

нужна поразрядная сортировка на статических массивах, входные данные вводятся с файла, сортировать по убыванию

Листинг программы

  for i:=0 to n-1 do a[i]:=b[i];

Объяснение кода листинга программы

В данном коде выполняется поразрядная сортировка массива a по возрастанию.

n - количество элементов в массиве b.
a - массив, в который будут сохраняться отсортированные значения.
b - массив, из которого будут сортироваться значения. Происходит переполнение массива a значениями из массива b. После этого происходит рекурсивный вызов функции до тех пор, пока не будет отсортирован массив a.