Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
Логикалық құрылымының баяндалуы
|
|
1-77.зауыттар санын, қоймалар санын, өндірілетін өнім, тұтынатын өнім және тасу құнын енгізу.
41.stringgrid2 ұзындығын және колонка санын табу.
42.b массивінің индексі.
43.g массивінің индексі.
44.жол нөмірі.
45.қатар нөмірі.
46-47.матрица өлшемі.
48.текстік файл.
49-51.массив өлшемдері.
52.h cуммасы.
89-90.массивті d көшіреміз,қорытынды файлға жазылу үшін.
102-110.жолдан min табу.
111.егер табылса,
112-118.онда қосу.
146.егер элемент нөлге тең болса,
149.жол нөмірін сақтау.
150.қатар нөмірін сақтау.
156.0-дік элемент табылған қатардан min табу
160.0-дік элемент табылған қатардан min табу.
162.элементтнрді қосу.
164-171.осы элементтерден max табу.
188-191.max табылған жерден қатар мен жолды сызу.
219. Матрица результаты.
235-248. соңғы қорытынды.
250. s-ті f (1)файлына жазу.
261.f(1)файлын жабу.
263-266. форма 2 көрсету.
267-270. форма 3 көрсету.
271-275. барлық формаларды жабу.
Шақыру және жүктеу
Біз бұл программаны орындау үшін Borland Delphi папкасын тауып аламыз да, сол жердегі Delphi32.ехе файлын 2 рет басамыз. Ашылған ортадан Коммивояжер файлын тауып Run командасын орындаймыз.
Ажетті техникалық жабдықтар
Бұл программаны жасауда Celeron 1800| 256 Mb| 40 Gb| 32 Mb GeForce| M| K компьютерін қолдандым. Сонымен қатар принтер қажет.
Кіріс мәліметтер
| Жіберу пункттері | Белгілеу пункттері | Қорлар | ||||
| B1 | B2 | B3 | B4 | B5 | ||
| A1 | ||||||
| A2 | ||||||
| A3 | ||||||
| Тұтынушылар |
1-сурет – кіріс мәліметтер
Шығыс мәліметтер
Жіберу пунктінен белгілеу пунктіне жүктерді тасмалдау кезіндегі минималды тасмалдау шығыны: z=1030
Соңында есептің шешімі x11=120,x14=60,x22=70,x23=70,x24=30,x25=50,x32=10,x33=90,x12=
x13=x15=x21=x31=x34=x35=0
ОРЫТЫНДЫ
Қазіргі уақытқа дейін сызықтық программалаудың ең қарапайым есептерінің бірі, кең тарағаны – транспорттық есеп. Яғни, жүктердің жіберу пункттерінен олардың бару пункттеріне біріктірудің, жүкті тасымалдаудың шығын бағасы минимизацияланатын есеп екеніне көзіміз анық жетті.
Бұл курстық жұмысты орындау барысында операцияны зерттеудің негізгі принциптерімен таныстым. Есептің оптималды шешімін табу үшін курс барысында өткен операцияны зерттеу әдістерінің ішіндегі қос мағыналы симплекәдісінің алгоритмін практика жүзінде қолдануды үйрендім.
Бұл курстық жұмысқа көрсетілген есепті формалдаудан кейін қос мағыналы симплекс әдісімен шығарылуы талап етілген. Сондықтан, қос мағыналы симплекс әдісіне Delphi7 ортасында программа жазу арқылы бұл есептің жауабына қол жеткіздім.
Date: 2016-05-13; view: 501; Нарушение авторских прав