DSolve[Derivative[1][y][x] == (Sqrt[x]*(-108*x^(3/2) + 18*x^(9/2) + x^9 - 108*x^(3/2)*y[x] - 18*x^6*y[x] + 108*x^3*y[x]^2 - 216*y[x]^3))/(-216 + 36*x^3 - 216*y[x]),y[x],x]
dsolve(diff(y(x),x) = (-108*x^(3/2)*y(x)+18*x^(9/2)-108*x^(3/2)-216*y(x)^3+108*x^3*y(x)^2-18*y(x)*x^6+x^9)*x^(1/2)/(-216*y(x)+36*x^3-216),y(x))