% ##################################################################################
% ##  Loesung:  Impulsfolge                                                       ##
% ##################################################################################

% #####  Teilaufgabe a:  zeitdiskrete endliche Signale  #####
% ### 1:    
k  = 1:20;
x1 = zeros(size(k));
x1(5) = 0.9;

figure; stem(k,x1); grid; xlabel('k'); ylabel('x1(k)');
 
% ### 2:    
k  = -15:15;
x2 = zeros(size(k));
x2(16) = 0.8;

figure; stem(k,x2); grid; xlabel('k'); ylabel('x2(k)');
 
% ### 3:    
k  = 300:350;
x3 = zeros(size(k));
x3(34) = 1.5;

figure; stem(k,x3); grid; xlabel('k'); ylabel('x3(k)');

% ### 4:
k  = -10:0;
x4 = zeros(size(k));
x4(4) = 4.5;

figure; stem(k,x4); grid; xlabel('k'); ylabel('x4(k)');

% #####  Teilaufgabe b:  Impulsfolge  #####
P = 5;
M = 10;
k = 0:(M*P)-1;
x = [1; 0; 0; 0; 0] * ones(1,M);
s = x(:);

figure; stem(k',s); grid; xlabel('k'); ylabel('s(k)'); axis([0 49 0 1.2]);

% #####  Teilaufgabe c:  Matlab Code  #####
x = [0;1;1;0;0;0] * ones(1,7);
x = x(:);

figure; stem(x); xlabel('k'); ylabel('x(k)'); axis([0 42 0 1]);
% #####  EOF  #####