| rotatePoint calcPoints mergePoints starPoints | rotatePoint := [ :x :y :rad | ((rad cos * x) - (rad sin * y)) @ ((rad cos * y) + (rad sin * x))]. calcPoints := [ :r | (0 to: 8/5 by: 2/5) asOrderedCollection collect: [:each | rotatePoint …

暇な時に過去問を解いたりしています。コンテスト自体は参加してません。 ほとんどのコンテストは、問題を解く早さにばかり傾倒していて自分は面白いと思わないからです。 ビジネスにおいては「早さ」がとても重要なのでしょう。自分もそう思いはしますが、…