2 files changed, 14 insertions, 0 deletions
diff --git a/62/CH6/EX6.25/ex_6_25.png b/62/CH6/EX6.25/ex_6_25.png
new file mode 100755
index 000000000..7bd911e36
--- /dev/null
+++ b/62/CH6/EX6.25/ex_6_25.png
diff --git a/62/CH6/EX6.25/ex_6_25.sce b/62/CH6/EX6.25/ex_6_25.sce
new file mode 100755
index 000000000..fe8584632
--- /dev/null
+++ b/62/CH6/EX6.25/ex_6_25.sce
@@ -0,0 +1,14 @@
+clear;
+close;
+clc;
+a=0.7;
+n=-10:10;
+disp("X(w)=1/(1-a*e^(%i*w))^2=[1/(1-a*e^(%i*w))]*[1/(1-a*e^(%i*w))]");
+disp("we know a^n*u[n] <--> 1/(1-a*e^(%i*w))  ")
+//therefore by convolution property
+xpartial=[zeros(1,find(n==0)-1) a^n(find(n==0):$)];
+x=convol(xpartial,xpartial);
+n1=-20:20;
+plot2d3(n1,x);
+plot(n1,x,'r.');
+xtitle('x[n]','n')
+\ No newline at end of file