Log(a) + b/2 == Log(25)

Log(a) + 10 b/3 == Log(16.9)

>>

b/2 - Log(25) == 10 b/3 - Log(16.9)

???

Computers make good servants but poor masters.

-- Mr. Spock

In[205]:= Solve[{a Exp[b/2] == 25, a*Exp[10 b/3] == 16.9}, {a,

b}, Reals]

During evaluation of In[205]:= Solve::ratnz: Solve was unable to solve the system with inexact coefficients. The answer was obtained by solving a corresponding exact system and numericizing the result. >>

Out[205]= {{a -> 26.7886, b -> -0.138198}}