Untitled

% Zadanie 5
% A = -19 , T = 15
clear all; clf;  % 5.1
syms t w 
x=-19*(heaviside(t+15/2)-heaviside(t-15/2));
figure(1)
ezplot(x,[-15 15])
grid
legend(‘x(t)’) % 5.1
 
x1=fourier (x,w); % 5.2
ww=linspace (-100/15, 100/15,412) ; 
xx1=subs(x1,w,ww);
 
figure (2)
plot (ww, xx1)
grid on; 
legend (‘X (w) ‘); xlabel (‘w rad/s’) ; % 5.2
 
x2=ifourier(x1,t); % 5.3
figure (3)
ezplot(x2,[-15 15]); grid on;
legend(‘x2(t)’)
title(‘Obrtn Furie transf’); % 5.3