1 files changed, 17 insertions, 0 deletions
diff --git a/2303/CH4/EX4.5/4_5.sce b/2303/CH4/EX4.5/4_5.sce
new file mode 100755
index 000000000..5740448fb
--- /dev/null
+++ b/2303/CH4/EX4.5/4_5.sce
@@ -0,0 +1,17 @@
+//Example 4.5
+//MAXIMA SCILAB TOOLBOX REQUIRED FOR THIS PROGRAM
+
+clear;
+clc ;
+close ;
+syms b n z;
+
+f1=b^n;
+F1= symsum (f1*(z^(-n)),n ,0, %inf );
+
+f2=b^-n;
+F2= symsum (f2*(z^(-n)),n ,-%inf, -1 );
+//Display the result in command window
+F=F1+F2;
+disp (F,"Z-transform of b^|n| is:");
+disp('ROC is the Region  b < mod(z) <1/b')