Циклы разработки проектировщиков

;генерируются три транзакта, которые представляют из себя проектировщиков

GENERATE ,,,3

;в параметре транзакта номер один сохраняем счётчик строк для цикла, введенных текущим проектировщиком

LAB_BEGIN ASSIGN 1,10

;формирование строки задания
;набор строки задания проектировщиком

ADVANCE 10,5

;цикл по строкам

LAB_LOOP_START QUEUE q_regiegistrator
SEIZE computer

;анализ строки сервером

ADVANCE 3
DEPART q_regiegistrator
RELEASE computer

;анализ строки терминалом

ADVANCE 5

;переходим на начало цикла
LOOP 1,LAB_LOOP_START

;обработка задания

QUEUE q_regiegistrator
SEIZE computer
DEPART q_regiegistrator

;обработка задания ЭВМ

ADVANCE 10,3
RELEASE computer

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

ADVANCE 8

;анализ результата решения проектировщиком

ADVANCE 30,10

;переход в начало формирования задания
TRANSFER ,LAB_BEGIN

;сегмент времени - моделируем в течение 8 ч

GENERATE (6#60#60)
SAVEVALUE prostoy,((QC$q_regiegistrator-QZ$q_regiegistrator)/QC$q_regiegistrator)
TERMINATE 1

START 1


****************РЕЗУЛЬТАТЫ МОДЕЛИРОВАНИЯ***************
*************коэффициент загрузки ЭВМ 0.792************
***********вероятность простоя ЭВМ 0.936******
***********ПАРАМЕТРЫ ОЧЕРЕДИ К ЭВМ************
***********средняя длина очереди 0.853**********
************макс.длина очереди  3**************
*******************среднее время пребывания в очереди 3.89с*****

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *