REBOL[]while[a: input][print a input]