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