Задача. Завод компании, производящей электронное оборудование, выпускает электронные часы. В упаковочном отделе часы упаковываются автоматической упаковочной машиной в количестве, заказанном розничными продавцами. Размер заказа определяется следующей функцией.
Размер заказа
Частота .10 .25 .30 .15 .12 .05 .03
Размер заказа 6 12 18 24 30 36 48
Время между поступлением заказов распределено экспоненциально со средним значением 15 минут. Время упаковки заказа составляет 120 секунд плюс 10 секунд за каждые часы, упакованные в заказе. Производственный цех выпускает электронные часы партиями по 60 штук через каждые 455 минут. Необходимо смоделировать 5 дней работы компании, чтобы получить следующую информацию:
1. Среднее количество заказов, ожидающих выполнения в упаковочном отделе;
2. Количество часов, отправляемых каждый день;
3. Распределение транзитного времени заказов.

Решение.

* Единица времени равна одному часу * 
Sizeorder FUNCTION RN1,D7 ;Размер заказа. 
.10,6/.35,12/.65,18/.80,24/.92,30/.97,36/1.0,48 
Transit TABLE M1,.015,.015,20 ;Транзитное время. 
Number TABLE X1,100,100,20 ;Количество часов, упакованных каждый день. 
Ptime VARIABLE .0028#P1+0.0334 ;Время упаковки. 
Amount EQU 1000 ;Начальное количество запасов. 
Stock STORAGE 4000 ;Склад вмещает 4000 единиц. 
GENERATE (Exponential(1,0,0.25)) ;Поступление заказа. 
ASSIGN 1,1,Sizeorder ;P1=размер заказа. 
TEST GE S$Stock,P1,Stockout ;Достаточно запасов? 
LEAVE Stock,P1 ;Исключить P1 со склада. 
QUEUE Packing 
SEIZE Machine ;Машина занимается. 
DEPART Packing 
ADVANCE V$Ptime ;Время упаковки. 
RELEASE Machine ;Машина освобождается. 
SAVEVALUE 1+,P1 ;Суммарное количество упакованных часов. 
TABULATE Transit ;Записывается транзитное время. 
TERMINATE 
Stockout TERMINATE 
GENERATE 0.75,0.08334,1 ;Транзакт каждые 40+/-5 минут. 
ENTER Stock,60 ;Произведено 60 часов, склад пополняется. 
Stockad TERMINATE 
GENERATE 8 ;Транзакт каждый «день». 
TABULATE Number 
SAVEVALUE 1,0 
TERMINATE 1 
GENERATE ,,,1,10 ;Транзакт инициализирующий склад. 
ENTER Stock,Amount ;Устанавливается начальный запас. 
TERMINATE
START 5 

Результаты моделирования.

---