Графы Delphi

[QuadroX]

Задание: По системе двусторонних дорог определить, есть ли в ней город, из которого можно добраться в любой другой менее чем за 100 км. Разрешается построить дополнительно 3 дороги.

Поясняю как выполнять. Систему нужно представить неориентированным графом. Вершины это города, ребра это дороги. Сам граф задается на канве (Canvas) формы. Расстояние между вершинами (городами) определяется по координатам канвы. Предусмотреть перетаскивание узла (вершины) мышкой. При перетаскивании меняется расстояние (увеличивается или уменьшается). Индикаторная надпись расстояния меняется одновременно с этим. Располагать эти надписи лучше рядом с ребром или на ребре. Теперь что касается алгоритма. Определили начальную вершину, из которой мы движемся. Дошли до следующей вершины, измерили расстояние. Если прямой дороги к вершине нет, то мы проходим через промежуточные узлы. Если расстояние в последнем случае оказалось больше 100км, то нам можно построить дополнительную дорогу напрямую из начальной вершины в конечную (строится она на канве при выполнении). Всего таких дорог можно построить три. После построения мы измеряем ее длину (вычисляем новое расстояние). Длину можно вычислить по теореме Пифагора, а можно определить относительно координат канвы.

Рекомендации по оформлению. В проекте должно быть два модуля. Первый интерфейсный. Второй логический. Логический модуль не должен использовать интерфейсный в uses. Логическую часть писать по возможности в отдельных процедурах, не использующих интерфейс формы и размещать их в логическом модуле. Граф строить на канве формы. Узлы графа обозначить кружочками с цифрой внутри, которая обозначает порядковый номер вершины (названия городов и пр. нам не нужны, если городов 10 то просто вершины будут содержать порядковые номера 1..10). Ребро графа обозначаем простой линией. Вес ребра текстом пишем около ребра или на ребре (если сделать в нем разрыв для текста). Добавить комментарии для всех процедур. Хотя бы что эта процедура делает. Подкинуть материал по теме, чтобы я смог это защитить. =)

Срок выполнения до вторника. В среду сдавать. Но лучше выполнить чуть раньше, т.к. никто гарантий не дает. Меня уже кинул недавно один программист с задачей. Просто перестал отвечать, когда подошел срок. Если берете это задание будьте уверены, что знаете тему и его выполните.

Мои контакты:

ICQ: 323787261
Email: quadrox@yandex.ru

Пишем цены и сроки туда.

[mikefreel]

Готов взяться за проект
номер ICQ: 565460353 или 480964456
mikefreelance@rambler.ru

[Virtson]

Пишу письмо с контактами и ссылкой на отзывы.

[Virtson]

Рисовать лучше на канве TPaintBox, для того компонент и существует =)

[QuadroX]

Исполнитель уже найден.

[QuadroX]

Задание: По системе двусторонних дорог определить, есть ли в ней город, из которого можно добраться в любой другой менее чем за 100 км. Разрешается построить дополнительно 3 дороги.

Есть курсовая и прога по этой задаче на C++.

http://depositfiles.com/files/c04jwx19n

Нужно сделать реализовать ее как можно проще в Delphi консоль либо в обычном Pascal и добавить построчные комментарии. Главное, чтобы я в ней разобрался. Также можно подкинуть мне теоретический материал по этой теме. Пишите цены и сроки. Задание серьезное. Не беритесь, если не уверены, что поняли хорошо его.

ICQ: 323787261
Email: quadrox@yandex.ru

[Virtson]

а говорите, найден...
теперь желания помогать нет.(

[QuadroX]

Сообщение от Virtson

а говорите, найден...
теперь желания помогать нет.(

Он не выполнил задание в срок. Плюс реализацию я решил сильно упросить. Все что написано в первом после не играет роли.

[QuadroX]

Поясняю момент по поводу построения 3х дополнительных дорог. Сначала проверяем условие без дополнительных дорог. Если условие не выполняется, то проверяем все варианты расположения одной дороги (их будет <= N*(N-1), где N количество городов). Если условие снова не выполняется, то проверяем все варианты расположения двух дорог ( их также будет максимум N*(N-1)*N*(N-1). Если условие снова не выполняется, то проверяем все варианты расположения трех дорог (максимум N*(N-1)*N(N-1)*N(N-1) вариантов). И на этом все. Если на каком-то этапе условие выполнилось, то сообщаем об этом и завершаем программу.

[Virtson]

уже бы сами сделали ..