{"width":"100%","url":"https://ikemonn.hatenablog.com/entry/2014/01/08/072427","published":"2014-01-08 07:24:27","blog_url":"https://ikemonn.hatenablog.com/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fikemonn.hatenablog.com%2Fentry%2F2014%2F01%2F08%2F072427\" title=\"\u3010SICP\u30111.2.1~1.2.2 - ikemonn&#39;s blog\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","version":"1.0","provider_url":"https://hatena.blog","title":"\u3010SICP\u30111.2.1~1.2.2","height":"190","provider_name":"Hatena Blog","blog_title":"ikemonn's blog","image_url":"http://ecx.images-amazon.com/images/I/51ZSMEJ9Y2L.jpg","description":"1.2.1 \u7dda\u5f62\u518d\u5e30\u3068\u53cd\u5fa9 \u7dda\u5f62\u518d\u5e30\u30d7\u30ed\u30bb\u30b9\uff1a\u30d7\u30ed\u30bb\u30b9\u3092\u5b9f\u884c\u3059\u308b\u3054\u3068\u306b\u3001\u5b9f\u884c\u3059\u308b\u6f14\u7b97\u304c\u7dda\u5f62\u306b\u6210\u9577\u3059\u308b\u518d\u5e30\u30d7\u30ed\u30bb\u30b9\u306e\u3053\u3068 \u7dda\u5f62\u53cd\u5fa9\u7684\u30d7\u30ed\u30bb\u30b9\uff1a\u30d7\u30ed\u30bb\u30b9\u306b\u5fc5\u8981\u306a\u30b9\u30c6\u30c3\u30d7\u6570\u304c\u7dda\u5f62\u306b\u6210\u9577\u3057\u3066\u3044\u304f\u53cd\u5fa9\u7684\u30d7\u30ed\u30bb\u30b9\u306e\u3053\u3068 6!\u306e\u7dda\u5f62\u518d\u5e30\u30d7\u30ed\u30bb\u30b9\u306e\u4f8b (define (factorial n) (if (= n 1) 1 (* n (factorial (- n 1))))) (factorial 6) 6!\u306e\u7dda\u5f62\u53cd\u5fa9\u7684\u30d7\u30ed\u30bb\u30b9\u306e\u4f8b (define (factorial n) (fact-iter 1 1 n)) (define (fact-iter product counter max-count) (i\u2026","type":"rich","author_url":"https://blog.hatena.ne.jp/ikemonn/","categories":["Lisp"],"author_name":"ikemonn"}