Lisp@UNIX版 (585ﾚｽ)
上下前次1-新

---

332(1): 名無しさん＠お腹いっぱい。 [sage] 03/07/03 10:49 AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
332: 名無しさん＠お腹いっぱい。 [sage] 03/07/03 10:49 どうして append 使わないで再帰で書きたいのかも教えてほしいけど… とりあえず、その条件だけならこんな感じでいけそう。 (defun test (list1 list2) (test1 list1 list2 ())) (defun test1 (l1 l2 lst) (if (null l1) (nreverse lst) (test1 (cdr l1) l2 (test2 (car l1) l2 lst)))) (defun test2 (s l r) (if (null l) r (test2 s (cdr l) (cons (concat s (car l)) r)))) http://mevius.5ch.net/test/read.cgi/unix/1019926525/332
どうして 使わないで再帰で書きたいのかも教えてほしいけど とりあえずその条件だけならこんな感じでいけそう

---

上下前次1-新書関写板覧索設栞歴

---

あと 253 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.022s