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