ПОТРІБНО ВИКОНАТИ ПРОГРАМУ ТА ВІДПОВСТИ НА ЗАПИТАННЯ

Tpr Table Q$OchB 0,10,50

Name1 Fvariable 5#Fn$NFunc1

Name2 Fvariable 8+2#Fn$NFunc2

NFunc1 Function Rn1 C24

0,0/.1,.104/.2,.222/.3,.355/.4,.509/.5,.69/.6,.915

.7,1.2/.75,1.38/.8,1.6/.84,1.83/.88,2.12/.9,2.3/.92,2.52

.94,2.81/.95,2.99/.96,3.2/.97,3.5/.98,3.9/.99,4.6

.995,5.3/.998,6.2/.999,7/1,8

Name3 Function Rn1,C2

0,5/1,8

NFunc2 Function Rn1 C25

0,-5/.00003,-4/.00135,-3/.00621,-2.5/.02275,-2

.06681,-1.5/.11507,-1.2/.15866,-1/.21186,-.8/.2725,-.6

.34458,-.4/.42074,-.2/.5,0/.57296,.2/.65542,.4

.72575,.6/.78814,.8/.84134,1/.88493,1.2/.93319,1.5

.97725,2/.99379,2.5/.99865,3/.99997,4/1,5

Generate V$Name1 

Split 1,Och2 

Och1 Queue OchA,1

Seize KanA 

Depart OchA,1

Advance  V$Name2

Release KanA 

Transfer .1,Kontr,Och1 

Och2 Queue OchB,1 

Seize KanB 

Depart OchB,1 

Advance  10,6

Release KanB 

Transfer .6,,Och2 

Och3 Queue OchC,1 

Seize KanC 

Depart OchC,1 

Advance V$Name2

Release KanC 

Transfer .15,,Och3 

Kontr Assemble 2 

Och4 Queue OchD,1 

Seize KanD 

Depart OchD,1 

Advance Fn$Name3

Release KanD

Tabulate Tpr,1

Terminate 

Generate 600

Terminate 1

Start 1