rebol[]loop 0 + take input[prin"+"]prin"."