... 4:mu:=0.15:beta:=2.5:n:=25:beta1:=1/beta:beta2:=evalf(GAMMA(beta1+1)):beta3:=evalf(GAMMA(2/beta+1)):t0:=[ 3. 3,1.4,5.7 ,3. 3,0.1,1.2,2.1,5.6 ,3. 2,2,6,7.1 ,3. 3,4.5,5 .3, 2.5,4.4,2.5,4.8 ,3. 5,infinity,infinity,infinity,infinity,infinity]:print("_______________________INPUTDATA____________________");seeda:=8 734 1:seedb:=64287:print("Arrival ... 5:4072 534 16 ‘beta’ ¼0 :31 76870924067420880:21 936 66225964 937 260:24887415120 738 79280:0442 439 933 27 739 3 033 2664 3 775‘K’=600, ‘spot’=660., ‘r’=0.04, ‘n’=4, ‘t’=0, ‘T’=0.5,‘x’ ¼52:54 3 2664 3 775; ... (blue)0.160.140.120.10.080.060.040.020246810beds26666666666666666666666666666666666666666666466666666666666666666666666666666666666666666666647.2 .3 A 20 bed ward with nonexponential servicedurations and no early departure> seeda:=8 734 1:seedb:=64287:n:=20:t0:=[ 3. 3,1.4,5.7 ,3. 3,0.1,1.2,2.1,5.6 ,3. 2,2,6,7.1 ,3. 3,4.5,5 .3, 2.5,4.4,2.5,infinity,infinity,infinity]:simtim:=10000:alpha:=0:lambda:=2.5:mu:=0.15:beta:=2.5:v:=hospital_ward(simtim,n,t0,alpha,lambda,mu,beta,seeda,seedb):u:=op (3, v):d:=seq([[j,0],...