ParametricPlot[{p^2, (-1 + p)^2}, {p, 0, 1}]