1 files changed, 12 insertions, 0 deletions
diff --git a/3812/CH10/EX10.12.a/10_12a.sce b/3812/CH10/EX10.12.a/10_12a.sce
new file mode 100644
index 000000000..9bac1171d
--- /dev/null
+++ b/3812/CH10/EX10.12.a/10_12a.sce
@@ -0,0 +1,12 @@
+//example 10.12(a):
+//Find Z transform
+clc;
+function[za]=ztransfer(sequence,n)
+z=poly(0,'z','r')
+za=sequence*(1/z)^n'
+endfunction
+x=[1,2,6,-2,0,3];
+n1=0:length(x)-1;
+X=ztransfer(x,n1);
+disp(X,'X(z)=');
+funcprot(0);