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

UptoLike

141
# системы за k шагов
k := 10
Pik := [ 0.319255007425857328, 0.219101123595042552, 0.213385981611026787, 0.248257887368073748[ ],
0.319246129174509008, 0.219101123597156472, 0.213389369899161407, 0.248263377329173502[ ],
0.319227194925857326, 0.219101123595042524, 0.213396606611026773, 0.248275074868073736[ ],
0.319210007425857368, 0.219101123595042552, 0.213403169111026775, 0.248285699868073750[ ]]
Проверка матрицы вероятностей переходов Pik
через k шагов
SumPik1j:=add(Pik[1, j], j=1..n);
SumPik2j:=add(Pik[2, j], j=1..n);
SumPik3j:=add(Pik[3, j], j=1..n);
SumPik4j:=add(Pik[4, j], j=1..n);
SumPik1j := 1.000000000
SumPik2j := 1.000000000
# системы за k шагов
                                             k := 10

Pik := [[0.319255007425857328, 0.219101123595042552, 0.213385981611026787, 0.248257887368073748],
     [0.319246129174509008, 0.219101123597156472, 0.213389369899161407, 0.248263377329173502],
     [0.319227194925857326, 0.219101123595042524, 0.213396606611026773, 0.248275074868073736],
     [0.319210007425857368, 0.219101123595042552, 0.213403169111026775, 0.248285699868073750]]




Проверка матрицы вероятностей переходов Pik
через k шагов
SumPik1j:=add(Pik[1,                      j],          j=1..n);
SumPik2j:=add(Pik[2,                      j],          j=1..n);
SumPik3j:=add(Pik[3,                      j],          j=1..n);
SumPik4j:=add(Pik[4,                      j],          j=1..n);




                                     SumPik1j := 1.000000000

                                     SumPik2j := 1.000000000
                                               141