(loop(format t"~D
"(/(!(*(set'n(read))2))(expt(! n)2))))