poddergrukovodstkp (интерпретатор GPSS и описание к нему), страница 17

мод. вр. = 1 часT21_EQU373 ; Среднее время наработки до отказа СС типа 1, часT22_EQU301 ; Среднее время наработки до отказа СС типа 2, часT23_EQU382 ; Среднее время наработки до отказа СС типа 3, часT24_EQU325 ; Среднее время наработки до отказа СС типа 4, часT25_EQU470 ; Среднее время наработки до отказа СС типа 5, часT1_EQU6.5 ; Среднее время ремонта СС типа 1, часT2_EQU4.2 ; Среднее время ремонта СС типа 2, часT3_EQU2.8 ; Среднее время ремонта СС типа 3, часT4_EQU3; Среднее время ремонта СС типа 4, часT5_EQU5.5 ; Среднее время ремонта СС типа 5, часStroka EQU1; Номер строки матрицыStolbez EQU1; Номер столбца матрицыS4_EQU11 ; Стоимость одного резервного ССS2_EQU30 ; Убыток в случае отсутствия на дежурстве одного ССS1_EQU20 ; Доход от одного СС, находящегося на дежурствеPrib1MATRIX,3,5 ; Матрица ожидаемой прибыли СС типа 1KPr1MATRIX,3,5 ; Матрица коффициентов ожидаемой прибыли СС типа 1KZen1MATRIX,3,5 ; Матрица коффициентов использования СС типа 1Prib2MATRIX,3,5 ; Матрица ожидаемой прибыли СС типа 2KPr2MATRIX,3,5 ; Матрица коффициентов ожидаемой прибыли СС типа 2KZen2MATRIX,3,5 ; Матрица коффициентов использования СС типа 2Prib3MATRIX,3,5 ; Матрица ожидаемой прибыли СС типа 3KPr3MATRIX,3,5 ; Матрица коффициентов ожидаемой прибыли СС типа 379KZen3MATRIX,3,5 ; Матрица коффициентов использования СС типа 3Prib4MATRIX,3,5 ; Матрица ожидаемой прибыли СС типа 4KPr4MATRIX,3,5 ; Матрица коффициентов ожидаемой прибыли СС типа 4KZen4MATRIX,3,5 ; Матрица коффициентов использования СС типа 4Prib5MATRIX,3,5 ; Матрица ожидаемой прибыли СС типа 5KPr5MATRIX,3,5 ; Матрица коффициентов ожидаемой прибыли СС типа 5KZen5MATRIX,3,5 ; Матрица коффициентов использования СС типа 5KRemMATRIX,3,5 ; Матрица коффициентов использования RemPribil MATRIX,3,5 ; Матрица суммарной прибылиSrKPrib MATRIX,3,5; Матрица средних коэффициентов прибыли за СС всех типовSrKIsp MATRIX,3,5 ; Матрица коффициентов использования СС всех типовCC1_STORAGE35; Емкость МКУ по количеству СС типа 1, находящихся на дежурствеCC2_STORAGE100 ; Емкость МКУ по количеству СС типа 2, находящихся на дежурствеCC3_STORAGE60 ; Емкость МКУ по количеству СС типа 3, находящихся на дежурствеCC4_STORAGE45 ; Емкость МКУ по количеству СС типа 4, находящихся на дежурствеCC5_STORAGE60 ; Емкость МКУ по количеству СС типа 5, находящихся на дежурствеRemSTORAGE5 ; Емкость МКУ по количеству мастеров-ремонтников; Описание арифметических выраженийDoxMax VARIABLE VrMod#n21_#S1_; Максимальный доход от дежурства СС типа 1Ubitok VARIABLE VrMod#n21_#(1-SR*1/1000)#S2_ ; Убыток от отсутствия на дежурстве ССтипа 1DoxPol VARIABLE X$DoxMax-X$Ubitok ; Полученный доход от дежурства СС типа 1StoRemVARIABLE (VrMod#SM$Rem#FN$StoMast)#(SR$Rem/1000); Стоимость ремонта неисправных ССZatrResSS VARIABLE S4_#n4_#VrMod; Затраты на содержание резервных СС типа 1SumPribVARIABLE X$DoxPol-(X$StoRem+X$ZatrResSS); Ожидаемая прибыльKoefPrVARIABLE MX*3(Stroka,Stolbez)/X$DoxMax ; Коэффициент прибылиStoMastFUNCTIONP1,D5; Стоимость оплаты работы одного мастера1,7/2,8/3,6/4,10/5,8; Cегмент постановки на дежурство СС типа 1GENERATE,,,1SPLIT(n21_-1) ; Размножение транзактов: число СС+число резервных ССASSIGN 1,1; Код 1 - признак СС типа 1ASSIGN 2,(Exponential(30,0,T21_)) ; Занесение в Р2 времени наработки на отказ,часASSIGN 3,(Exponential(31,0,T1_)) ; Занесение в Р3 времени ремонта СС типа 1TRANSFER ,Met1; Cегмент постановки на дежурство СС типа 2GENERATE,,,1SPLIT(n22_-1); Размножение транзактов: число СС типа 2ASSIGN 1,2; Код 2 - признак СС типа 2ASSIGN 2,(Exponential(30,0,T22_)) ; Занесение в Р2 времени наработки на отказ,часASSIGN 3,(Exponential(31,0,T2_)) ; Занесение в Р3 времени ремонта СС типа 2TRANSFER ,Met1; Cегмент постановки на дежурство СС типа 3GENERATE,,,1SPLIT(n23_+n4_-1); Размножение транзактов: число СС типа 3ASSIGN 1,3; Код 3 - признак СС типа 3ASSIGN 2,(Exponential(30,0,T23_)) ; Занесение в Р2 времени наработки на отказ,часASSIGN 3,(Exponential(31,0,T3_)) ; Занесение в Р3 времени ремонта СС типа 3TRANSFER ,Met1; Cегмент постановки на дежурство СС типа 4GENERATE,,,1SPLIT(n24_-1); Размножение транзактов: число СС типа 4ASSIGN 1,4; Код 4 - признак СС типа 4ASSIGN 2,(Exponential(30,0,T24_)) ; Занесение в Р2 времени наработки на отказ,часASSIGN 3,(Exponential(31,0,T4_)) ; Занесение в Р3 времени ремонта СС типа 4TRANSFER ,Met180; Cегмент постановки на дежурство СС типа 5GENERATE,,,1SPLIT(n25_-1); Размножение транзактов: число СС типа 5ASSIGN 1,5; Код 5 - признак СС типа 5ASSIGN 2,(Exponential(30,0,T25_)) ; Занесение в Р2 времени наработки на отказ,часASSIGN 3,(Exponential(31,0,T5_)) ; Занесение в Р3 времени ремонта СС типа 5TRANSFER ,Met1; Сегмент имитации дежурства ССMet1QUEUEP1; Встать в очередь на дежурство СС типа, номер которого в Р1ENTERP1; Встать на дежурство СС типа, номер которого в Р1DEPARTP1; Покинуть очередь на дежурство СС типа, номер которого в Р1ADVANCEP2 ; Имитация выхода СС типа из строя, номер которого в Р2LEAVEP1 ; Снятие с дежурства из-за выхода из строя СС типа, номер которогов Р1; Сегмент имитации ремонтного подразделенияENTERRem; Занять одного мастераADVANCEP3; Имитация ремонтаLEAVERem; Конец ремонтаTRANSFER ,Met1; Направить исправное СС на дежурство или в резерв; Сегмент заданияGENERATETEST EASSIGNASSIGNASSIGNMet23ASSIGNASSIGNASSIGNSAVEVALUESAVEVALUESAVEVALUESAVEVALUESAVEVALUEвремени моделирования и расчета результатовVrModTG1,1,Met23,-2; Подготовка к циклу1,0; Подготовка к циклу2,0; Подготовка к циклу2+,1; Начало цикла изменения номеров матриц1+,1; Начало цикла изменения типов СС3+,3 ; Начало цикла изменения номеров матриц, хранящих прибыльDoxMax,V$DoxMax ; Максимально возможный доход от дежурства ССUbitok,V$Ubitok ; УбытокDoxPol,V$DoxPol ; Полученный доход от дежурства ССStoRem,V$StoRem ; Затраты на ремонтZatrResSS,V$ZatrResSS; Затраты на резервные СС; Расчет ожидаемой прибылиMSAVEVALUE*2,Stroka,Stolbez,V$SumPrib; Прибыль по типу ССSAVEVALUE10,V$SumPribMSAVEVALUEPribil+,Stroka,Stolbez,X10; Суммарная прибыль по СС всех типовASSIGN2+,1MSAVEVALUE*2,Stroka,Stolbez,V$KoefPr; Коэфициент прибылиMSAVEVALUESrKPrib+,Stroka,Stolbez,(V$KoefPr/5) ; Средний коэффициент прибылипо СС всех типовASSIGN2+,1MSAVEVALUE*2,Stroka,Stolbez,(SR*1/1000) ; Коэффициент использования типа CCMSAVEVALUESrKIsp+,Stroka,Stolbez,(SR*1/(1000#5)); Средний коэффициентиспользования CC всех типовTEST GEP1,n2_,Met23MSAVEVALUE16,Stroka,Stolbez,(SR$Rem/1000); Коэффициент использования RemMet2TERMINATE 1START2000,NP; Неделя 1: Резервных СС=3, мастеров=5Stolbez EQU2RESETSTART2000,NP; Неделя 2: Резервных СС=3, мастеров=5Stolbez EQU3RESETSTART2000,NP; Неделя 3: Резервных СС=3, мастеров=5Stolbez EQU4RESETSTART2000,NP; Неделя 4: Резервных СС=3, мастеров=5Stolbez EQU581n4_RemStrokaStolbezStolbezStolbezStolbezStolbezn4_RemStrokaStolbezStolbezStolbezStolbezStolbezRESETSTARTEQUSTORAGEEQUEQUCLEARSTARTEQUCLEARSTARTEQUCLEARSTARTEQURESETSTARTEQURESETSTARTEQUSTORAGEEQUEQUCLEARSTARTEQUCLEARSTARTEQUCLEARSTARTEQURESETSTARTEQURESETSTART2000,NP4621OFF2000,NP2OFF2000,NP3OFF2000,NP4; Неделя 5: Резервных СС=3, мастеров=5; Неделя 1: Резервных СС=4, мастеров=6; Неделя 2: Резервных СС=4, мастеров=6; Неделя 3: Резервных СС=4, мастеров=62000,NP5; Неделя 4: Резервных СС=4, мастеров=62000,NP5731OFF2000,NP2OFF2000,NP3OFF2000,NP4; Неделя 5: Резервных СС=4, мастеров=6; Неделя 1: Резервных СС=5, мастеров=7; Неделя 2: Резервных СС=5, мастеров=7; Неделя 3: Резервных СС=5, мастеров=72000,NP5; Неделя 4: Резервных СС=5, мастеров=72000; Неделя 5: Резервных СС=5, мастеров=7Вариант 17Постановка задачиНа дежурстве находятся n1 средств связи (СС) n2 типов (n21 + n22 + … +n2n2 = n2) в течение n3 часов.Каждое СС может в любой момент времени выйти из строя.

В этом случае егозаменяют резервным, причем либо сразу, либо по мере его появления. Темвременем вышедшие из строя СС ремонтируют, после чего содержат в качестверезервного. Всего количество резервных СС n4.Ремонт неисправных СС производят n5 мастеров. Время T1, T2, …, Tn2 ремонта случайное и зависит от типа СС, но не зависит от того, какой мастерэто СС ремонтирует. Интервалы времени T21, T22, …, T2n2 между отказами находящихся на дежурстве СС случайные.Прибыль от СС, находящихся на дежурстве, составляет S1 денежных единиц вчас.