 Задача на сортировку методом обмена |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Nikeas |
 7.04.2007 17:43
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Репутация:  0   |
Массив размером MxN (M,N<=10) заполняется целыми числами из входного текстового файла. Исходный массив распечатывается. Строку, где расположен максимальный элемент массива, упорядочить по убыванию методом обмена. Переделанный массив распечатать.
Никак не могу упорядочить, кучу разных вариантов перепробовал - все равно не работает... Помогите, пожалуйста, исправить ошибки. 
Sort.PAS ( 1.26 килобайт )
Кол-во скачиваний: 309 |
   |
 
|
  |
Ответов
| Nikeas |
8.04.2007 11:34
Сообщение
#2
|
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Репутация: 0 |
Спасибо, сортирует теперь правильно
 Но я заметил, что ответ получается нормальный, если массив квадратный, а если нет - то в результате столько чисел, сколько в массиве строчек. Например, если массив 3x5, то в ответе будет не 5 чисел, а только 3. Как бы это исправить? |
|
|
|
Сообщений в этой теме
Nikeas Задача на сортировку методом обмена 7.04.2007 17:43
volvo Свой код:
begin
B[i]:=A[Imax,j];
for i:=1 to M do
... 7.04.2007 17:52 volvo Ну конечно... В том коде, который я привел везде п... 8.04.2007 11:53
Nikeas Поменял, теперь все правильно.
Большое спасибо... 8.04.2007 12:56 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 10.12.2025 0:34 |