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