T1 EQU 24 ; час, що витрачається автобусом А на маршрут
D1 EQU 4 ; відхилення в часі T1
T2 EQU 28 ; час, що витрачається автобусом В на маршрут
D2 EQU 6 ; відхилення в часі T2
T3 EQU 4 ; час, що витрачається на висадку пасажирів
D3 EQU 2 ; відхилення в часі Т3
LL EQU 40 ; максимальна довжина черги
SS EQU 2 ; плата за проїзд грошових одиниць
Avto_A STORAGE 25 ; автобус А
Avto_B STORAGE 25 ; автобус У
Vr1 VARIABLE (Uniform (1, T1-D1, T1 + D1)) ; час прямого шляху автобусів А і Б
Vr2 VARIABLE (Uniform (2, T2-D2, T2 + D2)) ; час зворотного шляху автобусів А і Б
Vr3 VARIABLE (Uniform (3, T3-D3, T3 + D3)) ; час висадки пасажирів з автобусів А і Б
Vrem QTABLE Och, 10,10,20 ; оцінює чергу з ім'ям Och
GENERATE (Exponential (1,0,1)) ; прибуття пасажирів
ADOPT 55 ; приналежність до одного сімейства
TEST LE Q $ Och, LL, Otkaz ; відмову, якщо довжина черги більше L
QUEUE Och ; стати в чергу
TRANSFER BOTH, Avt_A, Avt_B
