1 files changed, 9 insertions, 0 deletions
diff --git a/40/CH8/EX8.8/Exa_8_8.sce b/40/CH8/EX8.8/Exa_8_8.sce
new file mode 100755
index 000000000..7fad7f114
--- /dev/null
+++ b/40/CH8/EX8.8/Exa_8_8.sce
@@ -0,0 +1,9 @@
+//Relating DFT and DTFT
+xn=[1 2 1 0];
+XDFT=dft(xn,-1);
+//for F=k/4,k=0,1,2,3
+for k=1:4
+    XF(k)=1+2*%e^(-%i*%pi*(k-1)/2)+%e^(-%i*%pi*(k-1));
+end
+XF,XDFT
+disp(XF,'The DFT of x[n] is');