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

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

92
W9:=PolynomialInterpolation([seq(i, i=1..m)],
[seq(X[9,i],i=1..m)], t, form=Lagrange ):
plot([W1, W2, W3, W4, W5, W6, W7, W8, W9],
t=1..m, color=[aquamarine, black, blue, navy,
coral, cyan, brown, gold, green],
thickness=[2, 2, 2, 2, 2, 2, 2, 2, 2],
legend=[`1`, `2`,
`3`, `4`, `5`, `6`, `7`, `8`, `9`]);
for i from 1 to n do
plot(PolynomialInterpolation([seq(k,
k=1..m)], [seq(X[i,k],k=1..m)], z, form=Lagrange
), z=1..m,
thickness=2, color= red,
legend=`Realizaziya X(t)`);
listplot([seq(X[i,k], k=1..m)], thickness=2,
color= green, legend=`Sechenie X(t)`);
end do;
6.4. Движение системы при заданном случайном
воздействии WI(t)
> x(t):=W1;
SystemEquation := a1 * diff(y(t), t) + a0 *
y(t) = b1 * diff(x(t),t) + b0 * x(t): #
Уравнение системы на языке Maple
xt( ) := -0.02837833333 t - 2() t - 3() t - 4() t - 5() t - 6( ) + 0.1459416667 t - 1() t - 3() t - 4() t - 5() t - 6()
- 0.2887333333 t - 1() t - 2() t - 4() t - 5() t - 6( ) + 0.2900833333 t - 1() t - 2() t - 3() t - 5() t - 6()
- 0.1481916667 t - 1() t - 2() t - 3() t - 4() t - 6( ) + 0.02950333333 t - 1() t - 2() t - 3() t - 4() t - 5()
> RyW1(t) := dsolve( {SystemEquation,
y(0)=0}, y(t)): # Решение заданного
уравнения системы на языке Maple
> plot(rhs(RyW1(t)), t=0..10,color=red,
thickness=2); # Построение
графика движения при W1 
W9:=PolynomialInterpolation([seq(i, i=1..m)],
[seq(X[9,i],i=1..m)], t, form=Lagrange ):
plot([W1, W2, W3, W4, W5, W6, W7, W8, W9],
t=1..m, color=[aquamarine, black, blue, navy,
        coral, cyan, brown, gold, green],
thickness=[2, 2, 2, 2, 2, 2, 2, 2, 2],
legend=[`1`, `2`,
        `3`, `4`, `5`, `6`, `7`, `8`, `9`]);
for i from 1 to n do
   plot(PolynomialInterpolation([seq(k,
k=1..m)], [seq(X[i,k],k=1..m)], z, form=Lagrange
), z=1..m,
           thickness=2, color= red,
legend=`Realizaziya X(t)`);
   listplot([seq(X[i,k], k=1..m)], thickness=2,
color= green, legend=`Sechenie X(t)`);
end do;
6.4. Движение системы при заданном случайном
воздействии WI(t)

>x(t):=W1;
SystemEquation := a1 * diff(y(t), t) + a0 *
y(t) = b1 * diff(x(t),t) + b0 * x(t): #
Уравнение системы на языке Maple
    x(t) := -0.02837833333 (t - 2) (t - 3) (t - 4) (t - 5) (t - 6) + 0.1459416667 (t - 1) (t - 3) (t - 4) (t - 5) (t - 6)
           - 0.2887333333 (t - 1) (t - 2) (t - 4) (t - 5) (t - 6) + 0.2900833333 (t - 1) (t - 2) (t - 3) (t - 5) (t - 6)
           - 0.1481916667 (t - 1) (t - 2) (t - 3) (t - 4) (t - 6) + 0.02950333333 (t - 1) (t - 2) (t - 3) (t - 4) (t - 5)

>RyW1(t) := dsolve( {SystemEquation,
y(0)=0}, y(t)):       # Решение заданного
уравнения системы на языке Maple
> plot(rhs(RyW1(t)), t=0..10,color=red,
thickness=2);                    # Построение
графика движения при W1



                                                             92

Страницы