clear
clc
x=poly([0],'x');
p=2*(x^3)+x^2-13*x+6
disp("the roots of above equation are ")
roots(p)