Програмна реалізація методу подвійної переваги в середовищі програмування delphi

Delphi-проект реалізує процес знаходження опорного плану транспортної задачі використовуючи при цьому алгоритм методу подвійної переваги. Основна ідея даного методу полягає в тому, що перед початком заповнення таблиці необхідно позначити комірки, які мають найменшу вартість у рядках і стовпцях. Після цього, транспортну таблицю починають заповнювати з комірок, позначених двічі (як мінімальні і у рядку, і у стовпці). Далі заповнюють комірки, позначені один раз (як мінімальні або в рядку, або в стовпці), а вже потім — за методом мінімального елемента. Більш детальну інформацію про метод подвійної переваги можна знайти за посиланням Побудова опорного плану транспортної задачі методом подвійної переваги.

Головне вікно розглядуваного delphi-проекту ділиться на три частини: панелі інструментів (складається з двох компонентів типу TSpinEdit та двох кнопок типу TButton), робочої області (містить транспортну таблицю) та статусного рядка, основним призначенням якого є вивід загальної вартості перевезень згідно побудованого опорного плану. Розглянемо призначення кожного з цих елементів більш детально:

  1. Поля вибору "Пункти призначення" та "Пункти відправлення" відповідають за кількість пунктів які беруть участь в перевезенні, а також розмірність транспортної таблиці.
  2. Кнопки "Знайти опорний план методом подвійної переваги" та "Очистити" відповідають за побудову початкового плану транспортної задачі та підготовку програми до нового прикладу відповідно.
  3. Нарисована на канві форми транспортна таблиця у комірки якої, способом введення з клавіатури, записуються тарифи на перевезення одиниці продукції, загальні потреби у товарі кожного з пунктів призначення і загальна кількість запасів кожного з пунктів відправлення.

Після того, як призначення кожного з елементів форми відомо, провіримо його роботу на конкретному прикладі. Відмітимо, що в якості прикладу візьмемо задачу, яку ми розв'язували при розгляді теоретичної частини методу подвійної переваги (містится за вищевказаним посиланням). Отже, запустимо проект на виконання, у відповідні поля форми задамо розмірність таблиці та заповнимо її даними.

Заповнення транспортної таблиці даними

Далі, скориставшись кнопкою "Знайти опорний план методом подвійної переваги" запишемо у відповідні комірки таблиці числа, які означатимуть можливий план перевезення продукції загальна вартість якого міститься в статусному рядку.

Побудова опорного плану транспортної задачі

Скачати delphi-проект Побудова опорного плану транспортної задачі методом подвійної переваги.

Матеріал був корисним, поділись в соціальних мережах:

Якщо тобі сподобалась дана тема, залиш свій коментар