Лабораторная работа: Исследование линейных систем

%и критерий устойчивости Найквиста), файл prog.m

%Очистка всех переменных в памЯти

clear all

%Очистка командного окна

clc

%Закрытие всех предыдущих рисунков

set (0,'ShowHiddenHandles', 'on')

delete (get(0,'Children'))

%Параметры систем длЯ варианта #20

T1_s1 = 4;

T2_s1 = 1;

T3_s1 = 48;

K_s1 = 1;

T1_s2 = 80;

T2_s2 = 8;

K_s2 = 1;

T1_s3 = 10;

T2_s3 = 56.71;

K_s3 = 1;

%Описание разомкнутой и замкнутой систем через передаточные функции

p = tf('p');

R_s1 = K_s1*(T1_s1*p+1);

Q_s1 = (T2_s1*p+1)*(T3_s1*p‑1)*p;

W_s1_r = R_s1/Q_s1;

W_s1_z = R_s1/(Q_s1+R_s1);

R_s2 = K_s2*(T1_s2*p+1)^2;

Q_s2 = (T2_s2*p+1)^2*p^3;

W_s2_r = R_s2/Q_s2;

W_s2_z = R_s2/(Q_s2+R_s2);