initial commit / add all books

1 files changed, 28 insertions, 0 deletions

diff --git a/3812/CH10/EX10.53.b/10_53_b.sce b/3812/CH10/EX10.53.b/10_53_b.sce
new file mode 100644
index 000000000..483590112
--- /dev/null
+++ b/3812/CH10/EX10.53.b/10_53_b.sce
@@ -0,0 +1,28 @@
+//example 10_53<b>:

+//Find unilateral Z transform

+clc;

+function[za]=ztransfer(sequence,n)

+z=poly(0,'z','r')

+za=sequence*(1/z)^n'

+endfunction

+x=[1,2,5,4,0,3];

+n1=-2:3;

+count=0;

+for a=n1(1):length(x)

+    if a==0 then

+        abc=count;

+    else

+    end

+    count=count+1;        

+end

+abc=abc+1; 

+ac1=0;

+x11=[1 1 1 1];

+for a=abc:length(x)

+    ac1=ac1+1;

+    x11(ac1)=x(a);    

+end

+n11=0:(length(x)-abc);

+X=ztransfer(x11,n11);

+disp(X,'X(z)=');

+funcprot(0);