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