DSolve[y[x](1+(((y'[x]))^2))==d,y[x],x]

∫(Sqrt[(y/(d-y))])\[DifferentialD]y // FullSimplify

ParametricPlot[{t-Sin[t], Cos[t]-1},{t,0,π},
PlotStyle->{Red,Thick}]