%橡桁屦 1.4  
w1=0.01:0.01:0.1;   % 1 poddiapazon chastot
w2=0.1:0.02:1;      % 2 poddiapazon chastot
w3=1:0.1:10;        % 3 poddiapazon chastot
w4=10:1:1000;       % 4 poddiapazon chastot
w5=1000:50:10000;   % 5 poddiapazon chastot
w=[w1 w2 w3 w4 w5]; % diapazon chastot
W1=7*(j*w+4)./(1*j*w+2);         %AFCH 1 zvena
W2=1./(0.64*(j*w).^2+0.8*j*w+1); %AFCH 1 zvena
W=W1.*W2;                        %AFCH
A=abs(W);          %ACH
F=angle(W)*180/pi; %FCH
figure(1)
plot(real(W), imag(W)); %Stroim AFCH
title('AFCH')
grid
figure(2)
subplot(2,1,1)
plot(log10(w),20*log10(A));grid  %Stroim LACH
title('LACH')
subplot(2,1,2)
plot(log10(w),F);grid            %Stroim LFCH
title('LFCH')
