Сортировка массива в обратном порядке (задачка...) Опции

[TBVlad]

Учусь на дистанционке, учебный диск неполный, есть трудности...
Прочитал тему, близкую по содержанию, но программа, приведённая там, дала неверный результат.
Задание звучит так:
"Ввести одномерный массив из N действительных чисел. Пересортировать его в обратном порядке."

Знаю, что такое массив и как его вводить, умею сортировать по возр. и уб., но в обратном порядке - не понимаю... поможете?

[klem4]

Берешь массив, сравниваешь первые 2 элемента, в зависимости от этого определяешь отсортирован в данный момент массив по возрастанию или по убыванию, получив эти данные сортируешь противоположным способом ... Это конечно если заранее не известно по какому принципу отсортирован массив

Хотя нет, надо просто сделать инвесию массива и все !

Сообщение отредактировано: klem4 - 19.01.2006 15:06

[TBVlad]

Да есть мысль сделать так =) Инверсию через цикл downto.
Просто есть опасение, что преподша взъестся... "Ты чё сделал?! Надо пересортировать!"

[klem4]

for i := 1 to n div 2 do begin
   T := arr[i];
   arr[i] := arr[n-i+1];
   arr[n-i+1] := T;
end;

вот и все.

Сообщение отредактировано: klem4 - 19.01.2006 15:20

[TBVlad]

Спасибо, работает.

[klem4]

Спасибо, работает.

Незчато .. это стандартный алгоритм, "переварачивает" массив ...