[newb] numerical evaluation



Simple question;

log10(x) := log(x)/log(10.);
10*log10(1/(1+q1))=10*log10(1)-0.1;
solve([%], [q1]);
[q1=%e^(log(10)/100)-1]

How do I now get a numerical approximation to q1 (if I was using
mathematica, which I'm used to, I'd N[%])?