rebol[]for n 1 87 1[print round(2 * n)** .5 + n]