Piecewise[{{Integrate[x - a, {x, 0, 3}], a < 0}, {Integrate[-(x - a), {x, 0, a}] + Integrate[x - a, {x, a, 3}], 0 <= a <= 3}}, Integrate[-(x - a), {x, 0, 3}]]