Курсовая работа: Решение задач линейного программирования транспортной задачей
if x[i,j]>0 then
F:=F+x[i,j]*c[i,j];
Memo1.Lines.Add('Результат: '+IntToStr(F));
end;
end.
4.4 Руководство пользователя
Пуск
Запуск из среды Pascal производится нажатием клавиш Ctrl+F9, а из Norton Commander нажатием клавиши Enter на файле Inform.exe.
Ввод данных
Ввод данных производится только с цифровой клавиатуры. Цифры от 0 до 9.
Просмотр результатов.
После ввода цифры (нужного пункта в меню) выводится требуемый результат и после просмотра результата нужно нажать Enter. Затем вновь появится меню на экране.
Выход из программы
Выход из программы в среде Pascal и после запуска PTransport.exe файла производится 0-ым пунктом меню.
5. Анализ результатов
При решении задачи были получены результаты удовлетворяющие условию:
Решая задачу математически, получили значения:
|
К-во Просмотров: 408
Бесплатно скачать Курсовая работа: Решение задач линейного программирования транспортной задачей
|