REBOL[]while[a: input][prin a]