(while(print(x->integer(sqrt(apply *(map(rec,_(-(/(apply + =)2)_))(set! =`(0,#0=(read),#0#,#0#))))))))