作者: 機械伯爵
日時: 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さんあたりが見たら噴出すようなコードなんだろーなぁ/