thru 1343 do if(n:?read())<b:1024 then dispterms(n)else printf(?t,"~,2f ~cB
",(n+x:if n<b*b then 0 else 1)/b/b^x,75+2*x);