RegionPlot3D[0 <= x <= 4 - (4*z)/3 && 0 <= y <= 2 - x/2 - (2*z)/3 && 0 <= z <= 3, {x, -1, 4}, {y, -1, 2}, {z, -1, 3}]