ParametricPlot[{x=sin(t)^2, y=(cos2t)^2}, {t, 0, pi}]