DSolve[{b*x[t] - a*Derivative[1][y][t] + Derivative[2][x][t] == 0, b*y[t] + a*Derivative[1][x][t] + Derivative[2][y][t] == 0},{x[t], y[t]},t]