function E  = lab3p5(E0,n)
    E = lab3p5r(E0,n,n);
end

function E=lab3p5r(E0,n,n1)
    if(n==0)
        E = E0;
    else
        E = 1 - lab3p5r(E0,n-1,n1)*n1;
    end
end