% Program 2_2
% Generation of real exponential sequence
%
colordef black;
a = input('Type in exponent = ');
K = input('Type in the gain constant = ');
N = input ('Type in length of sequence = ');
n = 0:N;
x = K*a.^n;
stem(n,x,'g');
xlabel('Time index n');ylabel('Amplitude');
title(['alpha =  ',num2str(a)]);