sum(dispterms(fix(.5+log(?read())/log(?read()))),i,0,99);