作者: 機械伯爵 | |
日時: 2009/5/7(19:00) |
Smalltalk編 ■いきなり終了 10 factorial. "print it" ⇒3628800 コメント:ライブラリがばかでかいSmalltalkならでは、あたりまえのように階 乗計算用の関数(メソッド)が用意されている。 ■ループ構造 <to:do:ループ> y := 1. 1 to: 10 do: [:x | y := x * y]. Transcript show: y. "do it" コメント:to-doは、あまりSmalltalkっぽくないようだが、とりあえずこのよう な場合は使いやすいし、見やすい。 <whileTrue:を使ったループ> y := 1. x := 10. [x > 1] whileTrue: [y := y * x. x := x -1]. Transcript show: y. コメント:他の言語で書くと一般的な書式だが、Smalltalkだとやや見づらい ●使用環境がSqueakなので、再帰は省略(面倒らしい) /機械伯爵/sumimさんあたりが見たら噴出すようなコードなんだろーなぁ/