REBOL[]repeat i n: do input[repeat j n[a: i b: j while[b > 0][t: mod a b a: b b: t]prin [either(a = 1)['t][" "]]]print""]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page