Plot[{x-x^2/2, x-x^2/2-x^3/3},{x,0,2}, PlotStyle -> {Thick}, Ticks-> None]

Plot[{x-x^2/2, x/2-x^2/4-x^3/6},{x,0,2}, PlotStyle -> {Thick}, Ticks-> None]