clear all
close all
n=0:31;
x = [1 zeros(1,31)];  % impulse δέλτα
figure; stem(n,x);
x = [ones(1,16) zeros(1,16)];    % παλμός
figure; stem(n,x);