Програма призначена для знаходження початкового опорного плану транспортної задачі і використовує для цього алгоритм методу плаваючих зон. Основна відмінність даного методу від інших полягає в тому, що при заповненні транспортної таблиці до уваги беруться не тільки вартості перевезень, але й обсяги продукції які містяться в пунктах відправлення, та потреби пунктів призначення. Відмітимо, що саме такий підхід дає змогу отримати план дуже близький до оптимального.
Отже, головне вікно проекту ділиться на три частини: панелі інструментів (складається з двох компонентів типу TSpinEdit та двох кнопок типу TButton), робочої області (містить транспортну таблицю) та статусного рядка, основним призначенням якого є вивід загальної вартості перевезень згідно побудованого оптимального плану. Розглянемо призначення кожного з цих елементів більш детально:
- Поля вибору “Пункти призначення” та “Пункти відправлення” відповідають за кількість пунктів які беруть участь в перевезенні, а також розмірність транспортної таблиці.
- Кнопки “Знайти опорний план методом плаваючих зон” та “Очистити” відповідають за побудову оптимального плану транспортної задачі та підготовку програми до нового прикладу відповідно.
- Нарисована на канві форми транспортна таблиця у комірки якої, способом введення з клавіатури, записуються тарифи на перевезення одиниці продукції, загальні потреби у товарі кожного з пунктів призначення і загальна кількість запасів кожного з пунктів відправлення.
Після того, як призначення кожного з елементів форми відомо, провіримо роботу delphi-проекту на конкретному прикладі. Відмітимо, що в якості прикладу візьмемо задачу, яку ми розв’язували при розгляді теоретичної частини методу плаваючих зон (містится за вищевказаним посиланням). Отже, запустимо проект на виконання, у відповідні поля форми задамо розмірність таблиці та заповнимо її даними.
Далі, скориставшись кнопкою “Знайти опорний план розподільчим методом” запишемо у відповідні комірки таблиці числа, які означатимуть оптимальний план перевезення продукції загальна вартість якого міститься в статусному рядку.
Скачати delphi-проект Побудова опорного плану транспортної задачі методом плаваючих зон.