Курсовая работа: Система управления запасами с неудовлетворительным спросом

ASSIGN 1,V$Spros_m ; Размер спроса в Р1.

TABULATEZapas ; Запись тек. запаса.

TESTGES$Zapas,P1,Zapasout ; Можно ли заказать.

LEAVEZapas,P1 ; Уменьшить запас на Р1.

TERMINATE 1 ; Завершение дня.

ZapasoutTERMINATE 1 ; Завершение дня.

*********************************************

* Установление начального размера запаса.

GENERATE ,,,1,10 ; Начальный запас.

ENTERZapas,Nach_ur ; Установка нач. запаса.

TERMINATE ; Завершение установки.

*********************************************

Оператор RMULT определяет начальное число для генератора случайных чисел.

Оператор STORAGE (Накопитель) с меткой Zapas определяет вместимость склада 2500 единиц.