Скачиваний:
93
Добавлен:
15.06.2014
Размер:
120.43 Кб
Скачать

ЛАБА 6

tip function rn1,d3 0.2,1/0.9,2/1,3 srednob function p2,d3 1,40/2,60/3,20

generate (gamma(1,0,8,2)) assign 2,Fn$tip

savevalue p2+,1

assign 1,(exponential(2,0,fn$srednob)) savevalue sredn+,p1

queue och

seize poiskschit depart och advance 4,2 advance (p1/10)

release poiskschit

select nu 3,1,2,,,VYB_OCH

 

transfer

,obr

VYB_OCH select min

3,1,2,,Q

obr

queue p3

 

 

seize p3

 

 

depart p3

 

 

advance (normal(3,10,1))

 

release p3

 

terminate

 

 

generate

60000

 

terminate 1

ЛАБА 7

 

generate ,,,1

 

split 1,nachalo

 

split 1,upakovka

salt

gate Lr

postupl,nepost

 

advance

(poisson(1,60))

 

split 1,salt

 

split 29

 

 

queue och1

 

seize ochistka

 

depart och1

 

advance

(exponential(2,0,40))

 

release

ochistka

salt1

match upakovka1

 

transfer ,fasovka

upakovka

gate Lr

postupl,nepost

 

advance

35,5

 

split 1,upakovka

 

split 29

 

upakovka1

match salt1

fasovka

assemble 2

 

queue och2

 

seize fasovshik

 

depart och2

 

advance

1.5,0.5

 

release

fasovshik

 

savevalue kol_vo+,1

nepost

terminate

nachalo

logic r

postupl

 

advance

1200

logic s postupl advance 240 transfer ,nachalo

generate 60000 terminate 1

ЛАБА 8

 

auto1 storage

4

auto2 storage

6

mech storage 2

 

vremya1 table

m1,180,30,15

vremya2 table

m1,180,30,15

 

generate ,,,4

 

assign 1,1

reis1

enter auto1

 

advance (exponential(1,0,240))

 

leave auto1

 

transfer ,TO

 

generate ,,,6

 

assign 1,2

reis2

enter auto2

 

advance (exponential(1,0,300))

 

leave auto2

TO

mark

 

queue och

 

enter mech

 

depart och

 

test e p1,1,tip2

 

advance 25,5

 

transfer ,pereriv

tip2

advance 30,10

pereriv

leave mech

 

test g m1,10,relax

 

advance 270,90

 

transfer ,vreis

relax

advance 180,60

vreis

test e p1,1,time2

 

tabulate vremya1

 

mark

 

transfer ,tochnovreis

time2

tabulate vremya2

 

mark

tochnovreis test e p1,1,reis2 transfer ,reis1 generate 144000 terminate 1

Соседние файлы в папке laby