Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=332335&view=findpost&p=2902141 Fri, 27 May 2011 07:52:23 +0000 GPSS моделироапние СМО https://forum.sources.ru/index.php?showtopic=332335&view=findpost&p=2902141
написал такую штуку, но данные не совпадают с теоретическими:
    ; SEGMENT 1
    INITIAL X1,1  
    GENERATE ,,,2000
    MET1 ADVANCE(EXPONENTIAL(1,0,300))
    QUEUE B
    SEIZE K1
    ADVANCE(EXPONENTIAL(2,0,820))
    DEPART B
    RELEASE K1
    SAVEVALUE 1+,1
    SAVEVALUE X1,QT$B
     
    SEIZE K2
    ADVANCE(EXPONENTIAL(2,0,820))
    DEPART B
    RELEASE K2
    SAVEVALUE 1+,1
    SAVEVALUE X1,QT$B
     
    SEIZE K3
    ADVANCE(EXPONENTIAL(2,0,820))
    DEPART B
    RELEASE K3
    SAVEVALUE 1+,1
    SAVEVALUE X1,QT$B
     
    TRANSFER ,MET1
    ; SEGMENT 2
    GENERATE 6000
    TERMINATE 1
    START 1
    ; SEGMENT 3
    GENERATE 1
    TEST E Q$B,0,MET2
    SAVEVALUE PP0+,(1/6000)
    MET2 TEST E Q$B,1,MET3
    SAVEVALUE PP1+,(1/6000)
    MET3 TEST E Q$B,2,MET4
    SAVEVALUE PP2+,(1/6000)
    MET4 TEST E Q$B,3,MET5
    SAVEVALUE PP3+,(1/6000)
    MET5 TERMINATE


например вероятность простоя системы равна 0,075

в программе я эту величину собираю в PP0 и там совсем данные не совпадают =(]]> blackbanny GPSS