x = 2 a + 4 b + c;
y = a + 0 b + 3 c;
Maximize[
{2 x + 3 y, 0 < a < 40 && 0 < b < 20 && 0 < c < 10},
 {x, y}
]