... penangle 11 7: 11 8: 11 9: 12 0: 12 1: 12 2: 12 3: 12 4: 12 5: 12 6: 12 7: 12 8: 12 9: 13 0: 13 1: nt=length(th); z=zeros(nt ,1) ; x=[z,sin(th)]; y=[z,-cos(th)]; hold off, close if trac axis([ -1, 1, -1, 1]), axis ... -(p+s*exp(r*t1)).*T.*(T>0).*exp(r*T); © 2003 by CRC Press LLC 17 6: end 17 7: 17 8: %============================================= 17 9: 18 0: 18 1: 18 2: 18 3: 18 4: 18 5: 18 6: 18 7: 18 8: 18 9: 19 0: 19 1: 19 2: 19 3: 19 4: ... t=linspace(0,T2,nt)’; else n1=max(2,fix(t1/T2*nt)); n2=max(2,nt-n1) -1; t=[t1/n1*(0:n1),t1+t2/n2* (1: n2)]’; end 10 6: 10 7: 10 8: 10 9: 11 0: 11 1: 11 2: % Solve for the unknown parameter if isnan(q0), q0=(q2-s*c1-p*c2)/c0;...