summaryrefslogtreecommitdiff
path: root/716/CH7/EX7.1.a.V/7_12_ExerciseV7_1a.sce
blob: eed79b3b06e3ef2c5b896304a6151d825afa0686 (plain)
1
2
3
4
5
6
7
8
9
10
//determine z transform of x(n)={1,3,5,6}
clc;
clear;
x={1,3,5,6};
z=poly(0,"z");
X=0;
for n=1:1:4
    X=X+x(n).*(z^(-1*(n-1)));
end
disp(X,"Z tranform=");