2016年4月10日日曜日

開発環境

7つの言語 7つの世界 (Bruce A. Tate (著)、まつもとゆきひろ (監訳)、田和 勝 (翻訳)、オーム社)の第3章(Io)、3.3(2日目: ソーセージキング)、セルフスタディ2日目、1.を取り組んでみる。

セルフスタディ2日目、1.

コード(Emacs)

#!/usr/bin/env io

"再帰" println
fibRec := method(n,
                 if(n <= 1,
                    n,
                    fibRec(n - 2) + fibRec(n - 1)))

for(i, 1, 10, 1, fibRec(i) println)

"for loop" println
fibLoop := method(n,
                  if(n <= 1,
                     n,
                     a := 0
                     b := 1
                     for(i, 2, n, 1,
                         t := a
                         a = b
                         b = t + b);
                     b))

for(i, 1, 10, 1, fibLoop(i) println)

入出力結果(Terminal)

$ ./sample1.io
再帰
1
1
2
3
5
8
13
21
34
55
for loop
1
1
2
3
5
8
13
21
34
55
$

0 コメント:

コメントを投稿