 Сортировка по возрастанию, Двумерный список |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| habi |
  27.05.2008 23:19
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 44 Пол: Мужской Реальное имя: Артём Репутация:  0   |
Вот код, работает, сортирует окна, по увеличению гипотенузы(расстояния от нижнего правого угла до верхнего левого экрана) Но при повторном вызове Invalid floating point operation процедура vivod лишь прорисовывает окна в одинарной рамке, а если конец списка, то в двойной. Помогите исправить ошибку. Рад буду услышать совет по оптимизации или другой алгоритм. Сообщение отредактировано: habi - 28.05.2008 17:37 |
   |
 
|
  |
Ответов
| habi |
28.05.2008 22:41
Сообщение
#2
|
|
Новичок Группа: Пользователи Сообщений: 44 Пол: Мужской Реальное имя: Артём Репутация: 0 |
М =) здорово =) Вот ещё бы всё остальное переделать. за ночь =)
Выложи плз свой TURBO.TPU а то у меня дизион бай 0, ошибка. А с помощью тпумовер не патчит. upd сортировка работает =) Сообщение отредактировано: habi - 28.05.2008 23:12 |
|
|
|
Сообщений в этой теме
habi Сортировка по возрастанию 27.05.2008 23:19
volvo Угу... Как ты думаешь, очень интересно кому-то при... 27.05.2008 23:24 habi Программа работает, и сортирует, но при повторном ... 27.05.2008 23:29 volvo 1. В процедуре сортировки у тебя идет попытка обра... 28.05.2008 0:18 habi Вот пришёл с универа, проделал, то что ты написал ... 28.05.2008 18:33 volvo У тебя практически одно и то же делается дважды. П... 28.05.2008 19:12 habi Так ты не ответил на мой вопрос, я правильно обращ... 28.05.2008 19:17 volvo Мне неинтересно разбираться в дебрях кода. Вчера т... 28.05.2008 19:53 habi вопрос по другому:
type
InfoType = record
x1... 28.05.2008 19:56 habi Помогите разобраться в выводе окон.
Теряется видим... 28.05.2008 21:00 volvo А теперь сравни свой код вот с этим:
Что легче ч... 28.05.2008 22:26 volvo Ты про Turbo.TPL? 28.05.2008 23:54 habi Спасибо, не смог разобраться , как обращаться и за... 29.05.2008 0:05 volvo Чуть-чуть не так:
procedure MoveToLeft;
var
p:... 29.05.2008 0:19 habi Хм окна остаются на тех же местах.
Заново всё выво... 29.05.2008 0:25 volvo С чего бы?
p := first;
while p <> nil d... 29.05.2008 0:51
habi В том коде не была использована процедура show.
p.... 29.05.2008 1:07 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 18.07.2025 17:26 |