DSolve[{x[t] + y[t] + Derivative[2][x][t] == -5, -4*x[t] - 3*y[t] + Derivative[2][y][t] == -3},{x[t], y[t]},t]