function result = printseries
N = [];
while isempty(N)
N = str2double(input('N = '));
end
P = [];
while isempty(P)
P = str2double(input('P = '));
end
W = [];
while isempty(W)
W = str2double(input('W = '));
end
result = zeros(1, N);
result(1) = W;
for i = 2:N
result(i) = result(i - 1) * P;
end
function Y=dengBi(W,P,N)
Y=W;
for n=2:N
Y=[Y;Y(n-1,1)*P];
end
Y