Сиплекс метод - Паскаль, Turbo Pascal, PascalABC.NET

ChipLink · 30.11.2007, 16:27

Уважаемые программисты, помогите мне написать программу по симплекс методу на Pascal.Заранее огромнейшее спасибо!!!!!!!!!!
исходные данные: целевая ф-я f=7x1+5x2 -> max
система ограничений:
2x1+3x2=19
2x1+x2=13
3x1=18
3x2=15
Далее добавляем переменные
2x1+3x2+x3=19
2x1+x2+x4=13
3x1+x5=18
3x2+x6=15
составляем таблицу
базис свободные члены x1 x2 x3 .....x6
x3 19 2 3 1 0
x4 13 2 1 0 0
x5 15 0 3 0 0
x6 18 3 0 0 0
F 0 -7 -5 0 0
следней строке найти наименьший элемент и выделить этот столбец, затем в этом столбце найти наименьший эл-т (разделить базис на элемент стобца) выделить стороку. Создать след=ю таблицу.
Эл-т, получившийся на пересечении в следующей таблице заменить единицей, а остальные по столбцу нулями. Выделеный эл-т (3) заменить обратным(1/3) и умножить на него эл-ты строки(выделенной). Записать ее в новую табл. Работаем с остальными строками: там, где нули (напр до 0 была 5 значит из 5-5=0) на -5 умножаем эл-ты выдел-ой строки и прибавляем эл-ты не выделенной. Итак все строки пока в последней строке не будет отрицательных эл-тов.
Надеюсь вы поняли, что я имею в виду. теперь помогите мне написать для этого программу!!!PliZZZ1

kommunist · 30.11.2007, 16:33

В чем заключается твое задание?

zetrix · 30.11.2007, 17:23

Цитата:

следней строке найти наименьший элемент и выделить этот столбец, затем в этом столбце найти наименьший эл-т (разделить базис на элемент стобца) выделить стороку. Создать след=ю таблицу.
Эл-т, получившийся на пересечении в следующей таблице заменить единицей, а остальные по столбцу нулями. Выделеный эл-т (3) заменить обратным(1/3) и умножить на него эл-ты строки(выделенной). Записать ее в новую табл. Работаем с остальными строками: там, где нули (напр до 0 была 5 значит из 5-5=0) на -5 умножаем эл-ты выдел-ой строки и прибавляем эл-ты не выделенной. Итак все строки пока в последней строке не будет отрицательных эл-тов.
Надеюсь вы поняли, что я имею в виду. теперь помогите мне написать для этого программу!!!PliZZZ1

Да знаем мы симплекс метод

Программу написать только для данной функции?

ChipLink · 11.12.2007, 18:55

Да!можно еще и алгоритм скинуть мне по е-mail!

30.11.2007, 16:27	#1
ChipLink Регистрация: 30.11.2007 Сообщений: 6	Сиплекс метод Уважаемые программисты, помогите мне написать программу по симплекс методу на Pascal.Заранее огромнейшее спасибо!!!!!!!!!! исходные данные: целевая ф-я f=7x1+5x2 -> max система ограничений: 2x1+3x2=19 2x1+x2=13 3x1=18 3x2=15 Далее добавляем переменные 2x1+3x2+x3=19 2x1+x2+x4=13 3x1+x5=18 3x2+x6=15 составляем таблицу базис свободные члены x1 x2 x3 .....x6 x3 19 2 3 1 0 x4 13 2 1 0 0 x5 15 0 3 0 0 x6 18 3 0 0 0 F 0 -7 -5 0 0 следней строке найти наименьший элемент и выделить этот столбец, затем в этом столбце найти наименьший эл-т (разделить базис на элемент стобца) выделить стороку. Создать след=ю таблицу. Эл-т, получившийся на пересечении в следующей таблице заменить единицей, а остальные по столбцу нулями. Выделеный эл-т (3) заменить обратным(1/3) и умножить на него эл-ты строки(выделенной). Записать ее в новую табл. Работаем с остальными строками: там, где нули (напр до 0 была 5 значит из 5-5=0) на -5 умножаем эл-ты выдел-ой строки и прибавляем эл-ты не выделенной. Итак все строки пока в последней строке не будет отрицательных эл-тов. Надеюсь вы поняли, что я имею в виду. теперь помогите мне написать для этого программу!!!PliZZZ1 Последний раз редактировалось ChipLink; 30.11.2007 в 17:00.

30.11.2007, 16:33	#2
kommunist C# developer Форумчанин Регистрация: 03.10.2007 Сообщений: 393	В чем заключается твое задание? I like WPF

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Метод вижинера	Ghost_Dante	Помощь студентам	12	01.12.2011 21:58
Сиплекс метод	ChipLink	Помощь студентам	1	20.06.2009 08:09
Метод Гаусса	IgorKr	Помощь студентам	10	03.02.2008 11:28

11.12.2007, 18:55	#4
ChipLink Регистрация: 30.11.2007 Сообщений: 6	Да!можно еще и алгоритм скинуть мне по е-mail!