%rutina para obtener graficas de tiempo continuo
t=[0:.01:6];
A=3;
a=.5;
w0=pi;
ft=A*cos(w0*t);
figure(1),plot(t,ft,'g')
hold on
et=exp(-0.5*t);
figure(1),plot(t,et,'b')
gt=et.*ft;
figure(1),plot(t,gt,'r')
figure(123),subplot(3,1,1),plot(t,ft,'g'),subplot(3,1,2),plot(t,et,'b'),subplot(3,1,3),plot(t,gt,'r') 