|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
17.11.2016, 10:00 | #1 |
Пользователь
Регистрация: 17.11.2016
Сообщений: 28
|
Паскаль. Быстрая сортировка массива записи.
В файле содержатся сведения о веществах: название вещества, удельный вес и проводимость (проводник, полупроводник, диэлектрик).
В новый файл переписать данные, упорядочив их по убыванию удельных весов. Проблема: сортируется только если 3 записи. Код:
Последний раз редактировалось Лакира; 17.11.2016 в 10:02. |
17.11.2016, 11:13 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
простите, а зачем Вы засунули цикл по файлу внутрь рекурсивной процедуры сортировки?!
Или Вы не понимаете, что каждый раз, когда идёт вызов Alg11(f2, a, j); Alg11(f2, i, b); в цикле у Вас будет Reset(f2) - это переход к началу файл и новый цикл while not eof(f2) скажите честно, это Вы сами придумали? и, главное, зачем это? Ведь чтения из файла нет, сортируется массив mas (и, кстати, тоже неверно - обменивается только одно поле uweight! если там есть другие поля, то будет каша! ) ) короче, не зачёт! переделывать нужно. |
17.11.2016, 12:05 | #3 |
Пользователь
Регистрация: 17.11.2016
Сообщений: 28
|
Вот я поправила, но все равно не работает
Код:
|
17.11.2016, 12:19 | #4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
что Вы поправили? Убрали алгоритм QuickSort (aka "быстрая сортировка")?
А зачем? И как оно после этого должно работать? И зачем вы дёргаете файл? куда делся массив mas ? давайте начнём с начала. Что Вам дано и что нужно сделать? Вот прямо дословно и конкретно - какую задачу Вы пытаетесь решить? p.s. ну и попутно, если Вас интересует конкретный ответ, то: 1) укажите, каким Паскалем Вы пользуетесь 2) приведите код полностью, с описанием типов данных. |
17.11.2016, 12:31 | #5 |
Пользователь
Регистрация: 17.11.2016
Сообщений: 28
|
В файле содержатся сведения о веществах: название вещества, удельный вес и проводимость (проводник, полупроводник, диэлектрик). В новый файл переписать данные, упорядочив их по убыванию удельных весов.
1) Паскаль АВС 2) Код:
Последний раз редактировалось Лакира; 17.11.2016 в 12:35. |
17.11.2016, 13:40 | #6 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
так, потихоньку проясняется...
надеюсь, что Вы эту программу сами писали. Тогда вот ещё на три моих вопроса ответьте, пожалуйста. 1) откуда в теме появилась "быстрая сортировка"? Это просто так или это требование задания? 2) для чего описан массив записей mas:array[1..15]of Tsubstance; ?! 3) для чего процедура InputRec(var sub:Tsubstance); ?! Она же нигде не вызывается! |
17.11.2016, 13:48 | #7 |
Пользователь
Регистрация: 17.11.2016
Сообщений: 28
|
3) InputRec(var sub:Tsubstance) вызывается перед алгоритмом 1(тут у меня ошибка)
2) изначально пробовала сделать сортировку через массив записей, после редактирования не удалила 1)Желательно выполнить быстрой сортировкой Или покажите, пожалуйста, сортировку пузырьком для записи Вот вариант сортировки пузырьком, который тоже не рабочий Код:
Последний раз редактировалось Аватар; 17.11.2016 в 14:30. |
17.11.2016, 14:18 | #8 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
ладно. давайте поступим так.
вот Вам рабочий код: Код:
будут вопросы - обращайтесь! Последний раз редактировалось Serge_Bliznykov; 17.11.2016 в 14:20. |
17.11.2016, 19:40 | #9 |
Пользователь
Регистрация: 17.11.2016
Сообщений: 28
|
Не очень понимаю как работают эти строки. Поясните,пожалуйста.
Код:
|
17.11.2016, 21:42 | #10 | ||
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
кратенько: Цитата:
Быстрая сортировка (algolist) Быстрая сортировка (википедия) |
||
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Быстрая сортировка(сортировка Хоара). Сортировка фрагмента массива [C++] | druger | Помощь студентам | 0 | 20.04.2012 15:49 |
Задача в turboDelphi на записи,сортировка, создание нового массива , через процедуры. | mg4577 | Фриланс | 1 | 30.01.2012 20:20 |
Быстрая сортировка массива по двум параметрам. С#. | Necare | Помощь студентам | 2 | 14.09.2011 19:01 |
quickSort, Быстрая сортировка массива | kzht91 | Помощь студентам | 1 | 17.04.2010 00:30 |
быстрая сортировка настолько быстрая | Serg12 | Помощь студентам | 8 | 28.03.2010 21:31 |