(loop(format t"~D
"(/(read)2)))