(princ(floor(expt 10 100)(read)))