сортировка в паскале

[Flomic]

народ помогите плиз..последняя прога.

нужно упорядочить массив типа данных интеджер по убыванию абсолютного значения.

нужно использовать алгоритм выбора минимального элемента.суть в следущем:
Рассмотрим алгоритм для сортировки элементов массива а в порядке возрастания. Суть этого метода состоит в том, что, просматривая массив от первого элемента до последнего, определяем минимальный элемент. Минимальный элемент переставляется (при необходимости) на первое место массива. Затем описанная процедура повторяется с оставшимися элементами, начиная со второго. И так до тех пор, пока в несортированной части массива не останется один элемент.
Алгоритм может быть реализован и иначе. Просматривая массив от первого элемента до последнего, поочередно сравниваем первый элемент со всеми остальными. Если обнаруживается, что некоторый элемент меньше первого, то элементы переставляются. В результате в первом элементе массива окажется наименьшее из всех данных. Затем описанная процедура повторяется с оставшимися элементами, которые сравниваются уже со вторым элементом массива. И так до тех пор, пока в несортированной части массива не останется один элемент.