Компьютерное моделирование. Тарасов В.Н - 79 стр.

25 T_TAB TABLE MP4,100,100,5 ; формат таблицы для табулирования
30 GENERATE PROBA
40 ASSIGN 1,1                  ;определение номера терминала
50 TRANSFER ,METKA
60 GENERATE PROBA
70 ASSIGN 1,2                 ;определение номера терминала
80 METKA QUEUE QKAN
90 SEIZE KAN
100 DEPART QKAN
110 ADVANCE 65,25
120 RELEASE KAN
130 MARK 4        ;отметка времени входа транзакта в очередь к ЭВМ
140 QUEUE QEBM
150 SEIZE EBM
160 DEPART QEBM
170 ADVANCE 125,25
180 RELEASE EBM
190 TABULATE T_TAB ;первая точка табуляции времени пребывания
200 QUEUE QKBD       ;транзакта в очереди к ЭВМ и в самой ЭВМ
210 SEIZE KBD
220 DEPART QKBD
230 ADVANCE 65,25
240 RELEASE KBD
250 QUEUE BD
260 SEIZE BD
270 DEPART BD
280 ADVANCE 0
290 RELEASE BD
300 QUEUE QBD
310 SEIZE KBD
320 DEPART QBD
330 ADVANCE 65,35
340 RELEASE KBD
350 MARK 4 ;отметка вхождения в очередь транзакта при движении от
360 QUEUE QEBM ;базы данных
370 SEIZE EBM
380 DEPART QEBM
390 ADVANCE 125,25
400 RELEASE EBM
410 QUEUE QKAN
420 SEIZE KAN
430 DEPART QKAN
440 ADVANCE 65,25


                                                                     79