ustify"> Лебедєва О.І., Гафіятов І.З. Економічне обгрунтування проекту: Навчально-методичний посібник. Казань: Изд-во Казан. держ. ун-ту, 2009. 22с. p align="justify"> Потапов Г.П. Безпека життєдіяльності: Навчальний посібник. Казань: Изд-во Казан. держ. ун-ту, 2009. 54с. p align="center">
Додаток А Лістинг програми
initial x1, 7
initial x2, 9
initial x3, 7
initial x4, 4
initial x5, 2
initial x6, 25
initial x7, 9
initial x8, 10
initial x9, 6
initial x10, 4
initial x11, 2
initial x12, 2
initial x13, 1
initial x14, 0.125
initial x15, 0.094
initial x16, 15000
initial x17, 12000
initial x18, 12000
initial x19, 16000
initial x20, 20000
initial x21, 0.15
initial x22, 100
initial x23, 125
initial x24, 150
initial x25, 175
initial x26, 175
initial x27, 5
initial x28, 5
initial x29, 7
initial x30, 8
initial x31, 7
initial x32, 2000000
initial x33, 10000
initial x34, 70
initial x1000, 1000storage 7
bolv storage 7
sant storage 9
bols storage 9
elek storage 7
bole storage 7
pusk storage 4
bolp storage 4
kont storage 2
bolk storage 2
rab1 storage 7
rab2 storage 9
rab3 storage 7
rab4 storage 4
rab5 storage 2,, 1, x1advance (exponential (1,0, x22))
assign zabv, (uniform (1,1, x1))
funavail p $ zabv
enter rab1
advance (exponential (1,0, x27)) p $ zabvrab1, nachv,, 2, x2advance (exponential (1,0, x23)) zabs, (uniform (1,21, (21 + x2))) p $ zabs (exponential (1,0, x28)) p $ zabs, nachs,, 3, x3advance (exponential (1,0, x24)) zabe, (uniform (1,41, (41 + x3))) p $ zabe (exponential (1,0, x29)) p $ zabe, nache,, 4, x4advance (exponential (1,0, x25)) zabp, (uniform (1,61, (61 + x4))) p $ zabp (exponential (1,0, x30)) p $ zabp, nachp,, 5, x5advance (exponential (1,0, x26))
assign zabk, (uniform (1,81, (81 + x5)))
funavail p $ zabk
advance (exponential (1,0, x31))
favail p $ zabk
transfer, nachk (exponential (1,0, x6))
assign sl1, (uniform (1,0.8 # x7, 1.2 # x7))
assign sl2, (uniform (1,0.8 # x8, 1.2 # x8))
assign sl3, (uniform (1,0.8 # x9, 1.2 # x9))
split (p $ sl1-1), suda1assign 10, x7
queue orab1
gate snf rab1
enter rab1
gate lr ukaz1
logic s ukaz1
assign 1, x1
assign 2,1000
assign 4,1 assign 3 +, 1
gate fv p3, mimo1
gate nu p3, mimo1
test l fr * 3, p2, mimo1
assign 2, fr * 3
assign 4, p3loop 1, cik1r ukaz1
seize * 4
de...