REBOL[]while[i: input][print i input]