L=-0.015;
t=[0:1:500];
x0=3;
figure(1);
kolor='rgbkmc';
A=[-24:8:24];
for iter=[1:1:6]
    x=A(iter)*exp(L*t)+x0;
    plot(t,x,kolor(iter));
    hold on;
    %axis([0 500 0 25]);
    grid on;
end;
A=1;
L=-0.1;
t=[0:1:50];
figure(2);
w=0.5
fi=0;
for A=[1:1:6]
    subplot(3,2,A);
    x=A*exp(L*t).*cos(w*t+fi)+x0;
    plot(t,x);
    hold on;
    x=A*exp(L*t)+x0;
    plot(t,x,'r-');
    x=-A*exp(L*t)+x0;
    plot(t,x,'r-');
    grid on;
    axis([0 50 -5 10]);
end;