IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

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
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 27.05.2008 23:24
Сообщение #2


Гость






Цитата
Помогите исправить ошибку.
Угу... Как ты думаешь, очень интересно кому-то придумывать, что там у тебя за структура, что за список, какие поля и каких типов присутствуют в нем, если даже автор не потрудился создать простейшую законченную программу, которая показывает эффект? (тем более, что работа ведется с ГЛОБАЛЬНЫМИ переменными, которые могут меняться совершенно непредсказуемо между вызовами процедуры)

Добавлено через 1 мин.
P.S. Кстати, движок этого форума позволяет не только вставлять код внутрь поста, но и добавлять файлы как аттач...

Сообщение отредактировано: volvo - 27.05.2008 23:27
 К началу страницы 
+ Ответить 

Сообщений в этой теме
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
habi   М =) здорово =) Вот ещё бы всё остальное переделат...   28.05.2008 22:41
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:27
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"