Разработка программы на языке Pascal, позволяющей определить оптимальный выпуск изделий методом потенциалов (Практическая часть курсовой работы), страница 2

            ПН

ПО

В1

В2

В3

Запасы

ai

A1

2

170

3

150

4

320

A2

1

280

5

3

280

               Продолжение таблицы 3

            ПН

ПО

В1

В2

В3

Запасы

ai

A3

6

4

220

2

50

270

A4

7

8

5

350

350

Потребности bj

450

370

400

1220

          Находим значение целевой функции для нового опорного плана.

L = 170х2 + 150х3 + 280х1 + 220х4 + 50х2  + 350х5 = 3800

          Для полученного опорного плана произведем пересчет значений

потенциалов по формуле (9).

          Принимаем u1=0.

С11=u1+v1        v1= 2

С12=u1+v2       v2= 3

С21=u2+v1        u2= -1

С32=u3+v2       u3= 1

С33=u3+v3        v3= 1

С43=u4+v3       u4= 4

По формуле (10) вычисляем:

Δ13 = u1+v3-C13 = -3                                              

Δ22 = u2+v2-C22 = -3

Δ23 = u2+v3-C23 = -3

Δ31 = u3+v1-C31 = - 3

Δ41 = u4+v1-C41 = - 1

Δ42 = u4+v2-C42 = - 1

Так как все разности получились отрицательными, то найденный опорный план является оптимальным, а общая стоимость составленного плана равна 3800.

2.6 Обоснование выбора программного инсрументаля

В качестве языка программирования для создания программы был выбран язык программирования высокого уровня Pascal в реализации Borland Pascal 7.0 фирмы Borland International..

Преимущества системы программирования Pascal:

-  Pascal наиболее близок к современной методике и технологии

программирования;

-  Pascal хорошо приспособлен для применения общепризнанной в

настоящее время технологии разработки программ методом нисходящего проектирования. Это проявляется в том, что Pascal может  успешно использоваться для записи программы на разных уровнях ее детализации, не прибегая к помощи блок-схем или специального языка проектирования программ;

-  Pascal предоставляет весьма гибкие возможности в отношении

используемых структур данных;

-  Pascal хорошо  продуман с точки зрения эффективности как

реализации самого языка, так и получаемых в результате трансляции машинных программ;

-  В языке Pascal имеется большое количество процедур, которые

облегчают разработку пользовательского интерфейса и реализацию сложного алгоритма.

Благодаря этим особенностям Pascal находит все более широкое

применение не только в области обучения, но и в практической работе [3].

2.7  Описание программы

Программа позволяет решать транспортные задачи методом

потенциалов. Все исходные данные вводятся с клавиатуры. Программа состоит из 13 блоков.

          В блоке 1 с помощью процедуры assign происходит связывание файловых переменных р, р1, р2 с именами перечисленных текстовых файлов. Затем происходит открытие этих файлов для записи.

          В блоке 2 осуществляется ввод исходных данных с помощью процедуры read.

          В блоке 3 проверяется условие баланса, для этого вычисляются суммы запасов и суммы потребностей и сравниваются.

          В блоке 4 формируется матрица  x1 [i,j], то есть составляется первоначальный план методом северо-западного угла.

          В блоке 5 осуществляется запись в файл найденного опорного плана в виде таблицы.

          В блоке 6 вычисляется значение функции L1 и подсчитывается число базисных клеток cr1.

          В блоке 7 составляется опорный план методом аппроксимации Фогеля.

          В блоке 8 формируется запись в файл найденного опорного плана.

          В блоке 9 происходит вычисление значение функции L2 и подсчитывается число базисных клеток cr2.

          В блоке 10 находится оптимальный план методом потенциалов.

          В блоке 11 оптимальный план в виде таблицы записывается в файл.

          В блоке 12 вычисляется минимальное значение функции L.

          В блоке 13 происходит закрытие файлов, в которых осуществлялась запись.

          Листинг программы представлен в приложении А.

2.8  Руководство пользователю

Для того, чтобы данная программа запустилась Вам   необходимо

иметь в Вашем компьютере  среду программирования Pascal.

 Начинать работу следует с открытия в программе Pascal файла “Inna.pas”.

После нажатия кнопки на экране появится запрос на последовательный ввод исходных данных. После того, как все исходные данные введены программа запускается на выполнение.

Просмотреть опорный план, полученный методом северо-западного угла можно в файле «Otvv1.txt». В файле «Otvv2.txt»  просматривается  опорный план, созданный методом аппроксимации Фогеля. Решение ТЗ, полученное методом потенциалов можно увидеть в файле  «Otvv3.txt».

Файлы ответов приведены в приложениях Б, В, Г.

2.9  Анализ результатов

В результате решения транспортной задачи были получены следующие

значения.

Опорный план, составленный методом северо-западного угла:

320  0     0

130 150   0

                    Х=        0   220  50

  0     0   350

          Целевая функция L(x) = 4250.

          Опорный план, полученный методом аппроксимации Фогеля:

 


                              170  150     0

                    Х=     280    0       0

0  220   50

0      0    350

          Целевая функция L(x) = 3800.

Сравнивая целевые функции, полученные этими методами, мы пришли к выводу, что метод аппроксимации Фогеля дает лучший результат. 

          Решая ТЗ методом потенциалов получили оптимальный план выпуска колбасных изделий.

 


                              170  150     0

                    Х=     280    0       0

                                0    220    50

                                0      0    350

Минимальная себестоимость изготавливаемой продукции при таком плане составляет 3800 денежных единиц. Такую же стоимость получили при нахождении опорного плана методом аппроксимации Фогеля. В нашем случае опорный план, полученный методом аппроксимации Фогеля оптимальный.

Вывод

В практической части сформулирована математическая модель поставленной задачи. Составлен опорный план методом северо-западного угла и методом аппроксимации Фогеля. Приведено решение задачи ручным способом методом потенциалов, дано описание программы и проведен анализ результатов.  Разработано руководство пользователю.

Результаты работы программы полностью совпадают с ручными расчетами.

ЗАКЛЮЧЕНИЕ

          При выполнении курсовой работы была разработана программа на языке Pascal, позволяющая определить оптимальный выпуск колбасных изделий заводами мясокомбината методом потенциалов.

          Данная программа проста и удобна в использовании. Она позволяет находить оптимальный план выпуска изделий с  различными исходными данными. 

          Так как программа универсальна, она может быть применена в различных промышленных отраслях, где необходимо найти минимальную себестоимость изготовляемой продукции и оптимальный план перевозок. .