printf$_<($b=$$)?$_:"%.2f %sB ",($x=(.1+$_)/$b)<$b?($x,K):$x/$b,M for<>