Regular polygon by clock

n="$System.in"as Long
m=Math
n.times{printf"%.0f %.0f\n",1e3*m.cos(d=2*m.PI*it/n)+0.01,1e3*m.sin(d)}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page