Теория массового обслуживания. Сивохин А.В - 207 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

207
pfn_s := [pf
6
= 0.001315527902, pf
7
= 0.0002033743682, pf
8
= 0.00002649760940, pf
9
= 0.000002983330138,
pf
10
= 2.957135045 10
-7
, pf
11
= 2.618028237 10
-8
, pf
12
= 2.094092812 10
-9
, pf
13
= 1.527569140 10
-10
,
pf
14
= 1.024158801 10
-11
, pf
15
= 6.352535664 10
-13
]
> Sumpfi:=pf[0]+add(rhs(pf1_n[i]),
i=1..n)+add(rhs(pfn_s[i]), i=1..s);# Сумма
вероятностей всех состояний системы S
Sumpfi := 1.000000000
> Pleft1:=Bet/Alf*Alf^n/n!;
Pleft1 := 0.02865813985
> Pleft2:=sum(si*Alf^si/product((n+mi*Bet),
mi=1..si), si=1..10);
Pleft2 := 0.2622564123
> Pleft3:=sum(Alf^k/k!,
k=0..n)+Alf^n/n!*sum(Alf^si/product((n+mi*Bet),
mi=1..si), si=1..10);
Pleft3 := 3.430962139
> Pleft:=Pleft1*Pleft2/Pleft3; #
Вероятность того, что заявка покинет систему
необслуженной
Pleft := 0.002190575307
> q:=1-Pleft;
# Относительная пропускная способность системы S
q := 0.9978094247
> Twait:=1/Nu; #
Среднее время ожидания в очереди на обслуживание
системы S
Twait := 0.1631321370
> Ms:=Alf/Bet*pf[0]; #
Математическое ожидание числа заявок,
находящихся в очереди
Ms := 0.2415390268
> pfw[0]:=1/(sum(Alf^k/k!,
k=0..n)+Alf^(n+1)/(n!*(n-Alf)));
# Вероятность того, что все каналы свободны для
чистой системы с ожиданием: 
pfn_s := [pf6 = 0.001315527902, pf7 = 0.0002033743682, pf8 = 0.00002649760940, pf9 = 0.000002983330138,

                          -7                         -8                   -9                         -10
     pf10 = 2.957135045 10 , pf11 = 2.618028237 10 , pf12 = 2.094092812 10 , pf13 = 1.527569140 10     ,

                          -11                         -13
     pf14 = 1.024158801 10     , pf15 = 6.352535664 10    ]


> Sumpfi:=pf[0]+add(rhs(pf1_n[i]),
i=1..n)+add(rhs(pfn_s[i]), i=1..s);# Сумма
вероятностей всех состояний системы S
                                          Sumpfi := 1.000000000

>   Pleft1:=Bet/Alf*Alf^n/n!;
                                          Pleft1 := 0.02865813985

> Pleft2:=sum(si*Alf^si/product((n+mi*Bet),
mi=1..si), si=1..10);
                                          Pleft2 := 0.2622564123

> Pleft3:=sum(Alf^k/k!,
k=0..n)+Alf^n/n!*sum(Alf^si/product((n+mi*Bet),
mi=1..si), si=1..10);
                                           Pleft3 := 3.430962139

> Pleft:=Pleft1*Pleft2/Pleft3;      #
Вероятность того, что заявка покинет систему
необслуженной
                                          Pleft := 0.002190575307

>q:=1-Pleft;
# Относительная пропускная способность системы S
                                            q := 0.9978094247

> Twait:=1/Nu;                                 #
Среднее время ожидания в очереди на обслуживание
системы S
                                          Twait := 0.1631321370

> Ms:=Alf/Bet*pf[0];                                                                       #
Математическое ожидание числа заявок,
находящихся в очереди
                                            Ms := 0.2415390268

> pfw[0]:=1/(sum(Alf^k/k!,
k=0..n)+Alf^(n+1)/(n!*(n-Alf)));
# Вероятность того, что все каналы свободны для
чистой системы с ожиданием:
                                                    207

Страницы