summaryrefslogtreecommitdiff
path: root/2294/CH8/EX8.29/EX8_29.sce
diff options
context:
space:
mode:
Diffstat (limited to '2294/CH8/EX8.29/EX8_29.sce')
-rwxr-xr-x2294/CH8/EX8.29/EX8_29.sce36
1 files changed, 36 insertions, 0 deletions
diff --git a/2294/CH8/EX8.29/EX8_29.sce b/2294/CH8/EX8.29/EX8_29.sce
new file mode 100755
index 000000000..35ac651ad
--- /dev/null
+++ b/2294/CH8/EX8.29/EX8_29.sce
@@ -0,0 +1,36 @@
+//Find dft of the following sequence
+//Example 8.29.1
+clc;
+n=-10:10;
+for i=1:length(n)
+ if n(i)==0 then
+ x(i)=1;
+ else
+ x(i)=0;
+ end
+end
+y=fft(x,-1);
+disp(y,'The dft of the sequence is:');
+//Find dft of the following sequence
+//Example 8.29.2
+clc;
+n=-10:10;n0=2;
+for i=1:length(n)
+ if n(i)==n0 then
+ x(i)=1;
+ else
+ x(i)=0;
+ end
+end
+y=fft(x,-1);
+disp(y,'The dft of the sequence is:');
+//Find dft of the following sequence
+//Example 8.29.3
+clc;
+n=-10:10;a=2;
+for i=1:length(n)
+ x(i)=a^n(i);
+end
+y=fft(x,-1);
+disp(y,'The dft of the sequence is:');
+