2.2 Решение задачи с помощью прикладных программ
2.2.1 Технология разработки формы для ввода исходных данных средствами VBA
Для разработки формы ввода исходных данных необходимо отобразить вкладку «Разработчик» на ленте MS Excel. Для этого нужно в системном меню Excel выбрать «Настройка панели быстрого доступа», затем «Основные» и установить флажок на «Показывать вкладку Разработчик на ленте». Переходим на данную вкладку и выбираем Вставить, затем Кнопка. Размещаем кнопку на рабочем листе Excel, в диалоговом окне «Назначить макрос объекту» нажать на кнопку Создать и в открывшемся окне прописываем UserForm1.Show для перехода на форму. Переходим на вкладку «Разработчик» и нажимаем Visual Basic. Для создания формы выбираем Insert, а затем UserForm. Размещаем на форме все необходимые компоненты.
Рис. 2.2.1 Форма исходных данных
Далее необходимо щелкнуть 2 раза по кнопке Вычислить, выбрать нужное событие и прописать код программы. Листинг программы находится в Приложении В. Сохраняем книгу Excel с поддержкой макросов и при открытии всегда нажимаем Параметры и выбираем там «Включить это содержимое».
2.2.2 Описание процесса решения
На рабочем листе Excel в диапазоне ячеек от А1 до D4 в зависимости от выбранного количества предприятий размещаются исходные данные . Они будут переносится с формы Исходных данных. Например в ячейку А1 данные берутся из ячейки формы TextBox1, а в ячейке В2 размечается информация из ячейки TextBox2. В ячейках диапазона от А7 до D10 прописываем нули, необходимые для нахождения оптимального решения. Для решения задачи в нужные ячейки прописываем формулы:
Е1 =A1*A7+B1*B7+C1*C7+D1*D7
Е2 =A2*A8+B2*B8+C2*C8+D2*D8
Е3 =A3*A9+B3*B9+C3*C9+D3*D9
Е4 =A4*A10+B4*B10+C4*C10+D4*D10
Е5= =СУММ(E1:E4)
Е7=СУММ(A7:D7)
Е8=СУММ(A8:D8)
Е9=СУММ(A9:D9)
Е10=СУММ(A10:D10)
А11=СУММ(A7:A10)
B11= =СУММ(B7:B10)
C11= =СУММ(C7:C10)
D11= =СУММ(D7:D10)
E5=СУММ(E1:E4)
Для дальнейшего решения необходимо открыть вкладку Данные и выбрать Поиск решений. В открывшемся диалоговом окне установить целевую ячейку $E$5. Для Изменения ячейки выбрать $A$7:$D$10, установить следующие ограничения: $A$11:$D$11=1; $A$7:$D$10 = двоичное; $Е$7:$Е$10 = 1.
Рис. 2.2.2 Рабочий лист Excel
Затем нажать на Параметры установить галочки у Линейная модель и Неотрицательное значение. После всего кликнуть Выполнить. И в ячейке Е5 покажутся минимальные суммарные затраты.
2.3 Автоматизация решения задачи
2.3.1 Техническое задание
Полное наименование программной разработки: «Автоматизация процесса решения задач формирования оптимального штата фирмы».
Разработчик данного программного продукта — студент группы 401П ВГЭТК Андреева Юлия Александровна, в дальнейшем именуемый как «разработчик».
Разработка ведется на основании задания на курсовое проектирование, выданное пцк информационных технологий в лице преподавателя Еловенко Н.А.
Разработка программы ведется на языке программирования Object Pascal в среде программирования Borland Delphi 2007.
Программа должна выполнять следующие функции:
ввод данных;
проверка корректности исходных данных;
решение задачи оптимального назначения кандидатов на работу;
нахождение минимальных суммарных затрат.
В процессе работы программы входной информацией является ввод затрат, а выходными данными – минимальные суммарные затраты и назначение кандидатов на определенную работу.
Уровень надежности программы должен соответствовать технологии программирования.
Программа должна контролировать выбор пользователя пункта меню «Выход» и предупреждать его о потере « не сохраненных изменений».
Программа должна корректно работать на следующем или совместимым с ним оборудовании:
процессор Intel Pentium 100 Мгц и выше;
операционная система Windows XP;
среда программирования Borland Delphi 2007;
свободное место на диске не менее 20 Мб;
клавиатура;
мышь;
монитор;
оперативная память не менее 256 Мб.
операционная система Windows XP или более поздняя версия;
пакет прикладных программ Microsoft Office 2007.
Блок-схема алгоритма задачи представлена в Приложении А.
транспортный штат математический программа