(loop(princ(read))(terpri))