Solve[D[A x^s e^(-s x/r),{x,2}]==0,x]