Hatena::Groupcadr

わだばLisperになる このページをアンテナに追加 RSSフィード

2004 | 12 |
2005 | 01 | 02 | 07 | 10 | 11 |
2006 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2007 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2008 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2009 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2010 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2011 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 11 |

2007-01-02

勉強するよ.25

| 22:00 | 勉強するよ.25 - わだばLisperになる を含むブックマーク はてなブックマーク - 勉強するよ.25 - わだばLisperになる

紫藤さんのもうひとつの Scheme 入門の実習をすることの3回目

今回は、 3. リストを作ろう に挑戦

例によって練習問題をやってみるだけだったり。


;;  練習問題 1
;; 処理系が次のように表示するデータ構造を cons で作ってください。

;;    1. ("hi" . "everybody")
(cons "hi" "everybody")

;;    2. (0)
(cons 0 '())

;;    3. (1 10 . 100)
(cons 1 (cons 10 100))

;;    4. (1 10 100)
(cons 1 (cons 10 (cons 100 '())))

;;    5. (#\I "saw" 3 "girls")
(cons #\I (cons "saw" (cons 3 (cons "girls" '()))))

;;    6. ("Sum of" (1 2 3 4) "is" 10) 
(cons "Sum of" (cons '(1 2 3 4) (cons "is" (cons 10 '()))))


;;  練習問題 2
;; 次の値を求めてください。

;;    1. (car '(0))
0

;;    2. (cdr '(0))
()

;;    3. (car '((1 2 3) (4 5 6)))
(1 2 3)

;;    4. (cdr '(1 2 3 . 4))
(2 3 . 4)

;;    5. (cdr (cons 3 (cons 2 (cons 1 '())))) 
(2 1)

ゲスト



トラックバック - http://cadr.g.hatena.ne.jp/g000001/20070102