Maximize[{2250x+3000y-450000,10x+20y<=2400 && x<=150 && y <= 75},{x,y}]