DSolve[-x^a + x^(-1 - a)*y[x]^2 + Derivative[1][y][x] == 0,y[x],x]