solution

>	with(plots): inequal( [ a+b<3, 2*b-a<6,3*a+2*b>5,-b+a<=8,3*a+2*b>0], a=-1..6, b=-4..4,optionsfeasible=(color=red),optionsexcluded=(color=yellow));