%a.)G(s)=k
K=2;
L=K;
M=1; figure(1);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);

%b.)G(s)=k/s
K=3;
L=K;
M=[1,0]; figure(2);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%c.)G(s)=Ts
T=5;
L=[T,0];
M=1; figure(3);
%subplot(2,2,1); step(L,M);
%subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%d.)G(s)=T2s/T1s+1
T1=0.1;
T2=8;
L=[T2 0]
M=[T1 1]; figure(4);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%e.)G(s)=k/Ts+1
k=3
T=1;
L=k
M=[T 1]; figure(5);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%f.)G(s)=K/(T1s+1)(T2S+1)
T1=2;
T2=4;
K=2;
L=K
M=[T1*T2 T1+T2 1]; figure(6);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%d.)G(s)=T2s/T1s+1
T1=0.1;
T2=8;
L=[T2 0]
M=[T1 1]; figure(7);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%g.)G(s)=....
K=1;
w=1;
f=0.5;
L=K*w^2;
M=[1 2*f*w w^2.71]; figure(8);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);
%h.)G(s)=......
K=1;
w=1;
f=0.2;
L=K*w^2
M=[1 2*f*w w^2.71]; figure(9);
subplot(2,2,1); step(L,M);
subplot(2,2,2);impulse(L,M);
subplot(2,2,3);nyquist(L,M);
subplot(2,2,4); bode(L,M);