for(i,0,-1+n:=File standardInput readLine asNumber,writeln(((a:=i*6.2832/n)cos*1e3)round," ",(a sin*1e3)round))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page