Задача о цехе

@грусть-печаль · Регистрация: 29.11.2014

Студворк — интернет-сервис помощи студентам

Ребята помогите!!!!!
В механическом цеху есть M станков. Каждый из них может выйти из строя. Неисправности станков делятся на три типа. Неисправности i-го типа представляют собой пуассоновский поток с параметром λi минут-1. В цеху есть две категории мастеров-ремонтников. Функции распределения времени их работы по устранению неисправностей равномерные. Час работы станка дает прибыль S1 единиц стоимости; заработная плата ремонтника - S2 единиц стоимости в час для первой категории и S3 единиц стоимости для второй. Определить состав бригады ремонтников, при котором суммарная прибыль достигает максимума.
Данное задание было выполнено с параметрами по варианту 1, которые представлены в таблице 1 и таблице 2.
Таблица 1. Параметры задания

Code
1
2
3
4
5
6
7
8
9
Категория
мастера  Время работы на устранение неисправности j
    j = 1   j = 2   j = 3
1   16±4   18±4   -
2   10±3   15±6   19±5
Таблица 2. Параметры задания
Параметры
M   λ1 λ2 λ3 S1  S2  S3
50  1/100   1/200   1/300   7000    30  80

вот што у меня вышло

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
XPDIS Function RN1,C24
0,0/.1,.104/.2,.222/.3,.335/.4,.509/.5,.69/.6,.915/.7,1.2/.75,1.38/.8,1.6/
.84,1.83/.88,2.12/.9,2.3/.92,2.52/.94,2.81/.95,2.99/.96,3.2/.97,3.5/
.98,3.9/.99,4.6/.995,5.3/.998,6.2/.999,7/.9998,8
 
 
initial X$dohod,0       ;переменная для подсчета дохода
    initial X$pribyl,0      ;переменная для подсчета суммарной прибыли
    initial X$zarplata1,0       ;переменная для подсчета общей зарплаты бригады мастеров 1го класса
    initial X$zarplata2,0       ;переменная для подсчета общей зарплаты бригады мастеров 2го класса
    initial X$stanki,0      ;переменная для подсчета колличества сломавшихся станков
    
    BRIGADA1    storage 2       ;бригада ремонтников 1го класса
    BRIGADA2    storage 1       ;бригада ремонтников 2го класса
 
    generate 100,FN$XPDIS       ;моделируем поломку 1го типа
    savevalue stanki+,1     ;подсчет колличества станков
    assign 1,1      ;присваиваем 1му параметру значение 1
    transfer , goto_lim     ;безусловная переадресация к метке goto_lim
 
    generate 200,FN$XPDIS       ;моделируем поломку 2го типа
    savevalue stanki+,1     ;подсчет колличества станков
    assign 1,2      ;присваиваем 1му параметру значение 2
    transfer , goto_lim     ;безусловная переадресация к метке goto_lim
 
    generate 300,FN$XPDIS       ;моделируем поломку 3го типа
    savevalue stanki+,1     ;подсчет колличества станков
    assign 1,3      ;присваиваем 1му параметру значение 3
 
    test L X$stanki,51,goto_Exit  ;исключение возможности поломки более 50 машин
 
    Queue Remont        ;очередь на ремонт
    test NE P1,3,goto_BR2       ;машины с третьим типом поломки сразу отправляются в очередь к бригаде мастеров 2 класса
    
    test G Q$Remont_BR1,Q$Remont_BR2,goto_BR1 ;проверка на длину очередей
    transfer , goto_BR2     ;безусловная переадресация к метке goto_BR2
 
goto_BR1    Queue Remont_BR1        ;очередь на ремонт к бригаде ремонтников 1го класса
    Depart Remont       ;выход из очереди на ремонт
    Enter BRIGADA1      ;занятие МКУ, в котором находятся ремонтники 1го класса
    Depart Remont_BR1       ;выход из очереди на ремонт к бригаде ремонтников 1го класса
    test E P1,1,goto_1_P2       ;определение типа поломки
    Advance 16,4        ;ремонт машины с 1м типом поломки
    Leave BRIGADA1      ;выход из МКУ, в котором находятся ремонтники 1го класса
    savevalue dohod-,(116#M1)   ;вычитание из максимального дохода потерь, понесенных в результате простоя
    transfer , goto_Exit        ;безусловная переадресация к метке goto_Exit
goto_1_P2   Advance 18,4        ;ремонт машины со 2м типом поломки
    Leave BRIGADA1      ;выход из МКУ, в котором находятся ремонтники 1го класса
    savevalue dohod-,(116#M1)   ;вычитание из максимального дохода потерь, понесенных в результате простоя
    transfer , goto_Exit        ;безусловная переадресация к метке goto_Exit
    
goto_BR2    Queue Remont_BR2        ;очередь на ремонт к бригаде ремонтников 2го класса
    Depart Remont       ;выход из очереди на ремонт
    Enter BRIGADA2      ;занятие МКУ, в котором находятся ремонтники 2го класса
    Depart Remont_BR2       ;выход из очереди на ремонт к бригаде ремонтников 2го класса
    test E P1,1,goto_2_P2       ;определение типа поломки
    Advance 10,3        ;ремонт машины с 1м типом поломки
    Leave BRIGADA2      ;выход из МКУ, в котором находятся ремонтники 2го класса
    savevalue dohod-,(116#M1)   ;вычитание из максимального дохода потерь, понесенных в результате простоя
    transfer , goto_Exit        ;безусловнаяпереадресациякметкеgoto_Exit
goto_2_P2   test E P1,2,goto_2_P3       ;определение типа поломки
    Advance 15,6        ;ремонт машины со 2м типом поломки
    Leave BRIGADA2      ;выход из МКУ, в котором находятся ремонтники 2го класса
    savevalue dohod-,(116#M1)   ;вычитание из максимального дохода потерь, понесенных в результате простоя
    transfer , goto_Exit        ;безусловная переадресация к метке goto_Exit
goto_2_P3   Advance 19,5        ;ремонт машины с 3м типом поломки
    Leave BRIGADA2      ;выход из МКУ, в котором находятся ремонтники 2го класса
    savevalue dohod-,(116#M1)       ;вычитание из максимального дохода потерь, понесенных в результате простоя
    transfer , goto_Exit        ;безусловная переадресация к метке goto_Exit
    
goto_Exit   savevalue stanki-,1     ;исключение возможности поломки более 50 машин
    terminate 0     
 
    generate 10080      ;24 часа 7 дней в неделю
    savevalue dohod+,(116#50#10080);подсчет дохода
    savevalue zarplata1+,(2#30#24#7);подсчет зарплаты ремонтников 1го класса
    savevalue zarplata2+,(1#80#24#7);подсчет зарплаты ремонтников 2го класса
    savevalue pribyl+,(int(X$dohod-X$zarplata1-X$zarplata2)) ;подсчет итоговой прибыли
    terminate 1     
    start 1         ;старт

но 11/29/14 20:23:57 Model Translation Begun.
11/29/14 20:23:57 Ready.
11/29/14 20:23:57 Simulation in Progress.
11/29/14 20:23:57 Error Stop.
11/29/14 20:23:57 Halt. XN: 2. Block 9 Next.
11/29/14 20:23:57 Clock:83.131644. Next: GENERATE. Line 27.
11/29/14 20:23:57 generate 300,FN$XPDIS ;моделируем поломку 3го типа
11/29/14 20:23:57 Invalid attempt to enter a GENERATE Block.

@Dukalys · 29.11.2014, 22:26

Transfer , goto_lim

Во первых после запятой пробел не нужен
Во вторых не понятно что за метка такая goto_lim она вообще есть в программе?

@грусть-печаль · 29.11.2014, 22:57 **[ТС]**

а куда они по идее должны направляться?

@Dukalys · 30.11.2014, 08:01

Это уже вам виднее должно быть, может быть в 30ю строчку кода test ... ( метку ей эту поставьте).

Новые блоги и статьи Все статьи Все блоги /
Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .

@Dukalys 1817 / 1031 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	29.11.2014, 22:26
	Transfer , goto_lim Во первых после запятой пробел не нужен Во вторых не понятно что за метка такая goto_lim она вообще есть в программе? 0

@грусть-печаль 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 4
	29.11.2014, 22:57 [ТС]
	а куда они по идее должны направляться? 0

@Dukalys 1817 / 1031 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	30.11.2014, 08:01
	Это уже вам виднее должно быть, может быть в 30ю строчку кода test ... ( метку ей эту поставьте). 0