Maximize[{5 Sqrt[r] + 3 Sqrt[s], 20 r + 6 s == 308}, {r, s}]

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.