%% Exercício 2
function DiogoEliseu_TP2_2(N1, N2)
    n = N1:N2;
    
    % Impulso def
    impulso = zeros(1, abs(N1) + N2 + 1);
    impulso(ceil(length(n)/2)) = 1;

    % Degrau def
    degrau = (n >= 0);

    % Figura com os resultados
    figure
    % Plot da sequência X
    subplot(2,2,1:2)
    x = fun_x(n);
    stem(n, x)
    % Plot do impulso
    subplot(2,2,3)
    stem(n, impulso)
    % Plot do degrau
    subplot(2,2,4)
    stem(n, degrau)
end

%% Definição da sequência X
function p = fun_x(N)
    A=1.8;
    f=0.05;
    phi=0.5*pi;
    p=A*cos(2*pi*f*N+phi);
end