m:-readln(A),N is A-1,between(0,N,I),B=I*2*pi/A,\+format("~d ~d ",[round(1e3*cos(B)),round(1e3*sin(B))]).
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page