Такая вот задачка вроде простенькая а что то не выходит совсем. Нужно отсортировать ненулевые элементы в массиве по убыванию. То есть если у нас есть массив: 5 4 4 6 2 4 1 2 0 0 0 2 3 6 1 , то программа должна отсортировать отдельно элементы стоящие до нулей и после, оставив нули на своём месте. (6 5 4 4 4 2 1 0 0 0 6 3 2 1 ) , вся проблема для меня найтиномера этих нулевых элементов, чтоб начать сортировку следующей части массива с нужного символа. Может быть можно ещё как нибудь сделать? Прошу помощи.
http://forum.pascal.net.ru/index.php?showtopic=3065 - ознакомься, по идее должно пролить свет.
ты результаты своей программы видел ? поставь первой строчкой {$R+}
Dexoid, а ты точно правильно интерпретировал условие? Вполне могло быть и так:
исходный массив:
<5 4 4 6 2 4 1 2 0 0 0 2 3 6 1>
результат:
<6 6 5 4 4 4 3 2 0 0 0 2 2 1 1>
(то есть, нули-то остались на местах, а все остальные элементы не обращая внимания на нулевые отсортировали по невозрастанию).