Maximize[{75 Log[x] + 50 Log[y], 0.5 x + 0.5 y == 280}, {x, y}]

Uh oh! Wolfram|Alpha doesn't run without JavaScript.

Please enable JavaScript. If you don't know how, you can find instructionshere.Once you've done that, refresh this page to start using Wolfram|Alpha.