function polynom_rovnice
p=[7,0,0,0,0,0,-1,6];
roots(p)


end

