REBOL[]for i 10 17 1[print i]prin{20
22
24
31
100
121
10000}