compute DFT and IDFT of discrete time sequence

clc
clear all
close all
%x=input('Enter the sequence')
x=[5,6,7,8];
N=length(x);
xk=zeros(1,N);
ixk=zeros(1,N);
X=[];
xx=0;
for k=0:1:N-1
    for n=0:1:N-1
        xx=xx+x(n+1)*exp(-j*2*pi*n*k/N);
    end
    X=[X xx];
    xx=0;
end
x
X

for n=0:1:N-1
    ix(n+1)=0;
    for k=0:1:N-1
        ix(n+1)=ix(n+1)+x(n+1)*exp(j*2*pi*n*k/N);
    end
end
ix=ix/N

Answer 1

[Aniket Jadhav]

clc
clear all
close all
%x=input('Enter the sequence')
x=[5,6,7,8];
N=length(x);
xk=zeros(1,N);
ixk=zeros(1,N);
X=[];
xx=0;
for k=0:1:N-1
    for n=0:1:N-1
        xx=xx+x(n+1)*exp(-j*2*pi*n*k/N);
    end
    X=[X xx];
    xx=0;
end
x
X

for n=0:1:N-1
    ix(n+1)=0;
    for k=0:1:N-1
        ix(n+1)=ix(n+1)+x(n+1)*exp(j*2*pi*n*k/N);
    end
end
ix=ix/N