Условие:
Даны два массива чисел. Расположить элементы в первом массиве по возрастанию, а во втором по убыванию, используя одну процедуру сортировки. Написать программу в pascal

Даны два массива чисел. Расположить элементы в первом массиве по возрастанию, а во втором по убыванию, используя одну процедуру сортировки. Написать программу в pascal
Ниже привожу пошаговое описание решения задачи и конечный вариант программы на языке Pascal:
Сначала зададим два массива. В нашем примере для наглядности выбраны массивы длиной 5 элементов с произвольными значениями.
Необходимо создать единую процедуру сортировки, которая сможет сортировать массив в двух направлениях – по возрастанию и по убыванию. Для этого в процедуру передаем дополнительный булевый параметр (например, asc), который отвечает за тип сортировки: true – сортировка по возрастанию, false – по убыванию.
Для сортировки можно использовать алгоритм пузырьковой сортировки....