Código en Scilab