clc;
clear all;
close all;
 
A0 = 10;        % РлЬфпт
f = 2;          % Ухчньфзфб
L = 0.4;        % УфбиесЬ брьувеузт
t = [0:0.01:5]; % Чсьнпт
 
for i=1:length(t)
   A(i) = A0*exp(-L*t(i));
   x(i) = A(i)*sin(2*pi*f*t(i)+pi/2);
end
 
hold on;
plot(t,x,'b*');
plot(t,A,'r--');

grid on;
xlabel('Чсьнпт (t)');
legend('БрпмЬксхнуз x(t)','РлЬфпт A(t)','Location','NE');
