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

UptoLike

80
An(iw) := a1 * I * w + a0;
# Частотный операторный полином выхода для
y(t)
Bm(iw) := b1* I * w + b0;
# Частотный операторный полином входа для
x(t)
K(iw) := Bm(iw)/An(iw);
# Частотная функция линейной динамической
системы системы
Amlituda(iw) := abs(K(iw));
# Амплитудно-частотная характеристика
Faza(iw) := arctan(Im(K(iw))/Re(K(iw))); #
Фазово-частотная характеристика
An p( ) := 6.83 p + 1.34
Bm p( ) := 8.34 p + 5.85
Kp( ) :=
8.34 p + 5.85
6.83 p + 1.34
An iw( ) := 6.83 I w + 1.34
Bm iw( ) := 8.34 I w + 5.85
Kiw( ) :=
8.34 I w + 5.85
6.83 I w + 1.34
Amlituda iw( ) :=
8.34 I w + 5.85
6.83 I w + 1.34
?
?
?
?
?
?
Faza iw( ) := arctan
?
8.34 I w + 5.85
6.83 I w + 1.34
?
?
?
?
?
?
?
8.34 I w + 5.85
6.83 I w + 1.34
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
> plot(Amlituda(iw), w=1..10,color=red,
thickness=2); # Построение графика
амплитудно-частотный характеристики
An(iw) := a1 * I * w + a0;
# Частотный операторный полином выхода для
y(t)
Bm(iw) := b1* I * w + b0;
# Частотный операторный полином входа для
x(t)
K(iw)    := Bm(iw)/An(iw);
# Частотная функция линейной динамической
системы системы
Amlituda(iw) := abs(K(iw));
# Амплитудно-частотная характеристика
Faza(iw)   := arctan(Im(K(iw))/Re(K(iw))); #
Фазово-частотная характеристика
                         An(p) := 6.83 p + 1.34

                        Bm(p) := 8.34 p + 5.85

                                   8.34 p + 5.85
                         K(p) :=
                                   6.83 p + 1.34

                       An(iw) := 6.83 I w + 1.34

                       Bm(iw) := 8.34 I w + 5.85

                                   8.34 I w + 5.85
                       K(iw) :=
                                   6.83 I w + 1.34

                                   8.34 I w + 5.85 ?
                  Amlituda(iw) := ?
                                  ?                ?
                                  ?6.83 I w + 1.34 ?

                                ? ? 8.34 I w + 5.85 ?     ?
                                ? ? ? 6.83 I w + 1.34 ?   ?
                                ? ?                   ?   ?
              Faza(iw) := arctan?                         ?
                                ? ? 8.34 I w + 5.85 ?     ?
                                ? ? ? 6.83 I w + 1.34 ?   ?
                                ? ?                   ?   ?


> plot(Amlituda(iw), w=1..10,color=red,
thickness=2); # Построение графика
амплитудно-частотный характеристики




                                     80