2016年1月11日月曜日

開発環境

  • OS X El Capitan - Apple (OS)
  • Emacs (Text Editor)
  • Lua (プログラミング言語)

Seven More Languages in Seven Weeks (Bruce Tate (著)、Ian Dees (著)、Frederic Daoud (著)、Jack Moffitt (著)、Pragmatic Bookshelf)のChapter 1(Lua)、Day 1(The Call to Adventure)、Do (Hard)(No. 668).を取り組んでみる。

Do (Hard)(No. 668)

コード(Emacs)

function reduce(max, init, f)
   for i = 1, max do
      init = f(init, i)
   end
   return init
end

function add(previous, next)
   return previous + next
end

function mul(previous, next)
   return previous * next
end

function factorial(n)
   return reduce(n, 1, mul)
end

print(reduce(5, 0, add))
for num = 0, 10 do
   print(factorial(num))
end

入出力結果(Terminal)

$ lua sample_hard.lua
15
1
1
2
6
24
120
720
5040
40320
362880
3628800
$

0 コメント:

コメントを投稿

Comments on Google+: