DSolve[{Derivative[1][x][t] == x[t]*(b + a*y[t]), Derivative[1][y][t] == (d + c*x[t])*y[t]},{x[t], y[t]},t]