path: root/758/CH6/EX6.20/Ex_6_20.sce

//Example 6.20

clc;clear;
n=0:7;
x=2^n;
X=clean(fft(x));
disp(x,'x(n)=');
disp(X,'X(k)=');