plot[y=x^4-4x^3+7x^2+5|,{x,0,π/2}]