kill(all)$

van=facebook.com/LearningCalculus$

f(x) := 8^x = 8 * x;

solve(f(x),x);

     By inspection:

f(1);

     By Newton's method recursively:

f(x):= 8^x - 8*x;

newton(t):=float(subst(t,x,x-f(x)/diff(f(x),x)))$

newton(1);

newton(newton(newton(newton(0.2))));