van=facebook.com/LearningCalculus$

f(carrot,bean) := carrot^(1/bean) = 3$

g(carrot,bean) := carrot*bean = 324$

for carrot:1 thru 81 do
    for bean:1 thru 81 do
        if f(carrot,bean) and g(carrot,bean) then
            print ("Answer  ",'f(carrot,bean))$

solve(f(x,y),y);

solve(g(x,y),y);