(read)(loop(format t"~D
"(round(expt 2.618033989L0(+(read)1/2))5)))