【入門】Common Lisp その３【質問よろず】
at TECH
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
600:デフォルトの名無しさん 07/09/30 19:16:58 >>599 そりはすれち 601:デフォルトの名無しさん 07/09/30 21:33:06 >>599 Gauche でやってみたよ (use srfi-42) (define (pair seq) (let1 counter 0 (do-ec (: xs seq) (: ys (cdr (member xs seq))) (begin (format #t "(~s ~s)~%" xs ys) (inc! counter))) (format #t "~d~%" counter))) gosh> (pair '(a b c d)) (a b) (a c) (a d) (b c) (b d) (c d) 6 >>600 スレちがいゴメン 602:デフォルトの名無しさん 07/09/30 22:43:18 >>601 うほ！ ありがとございます！ srfi-42 ムズカシイんです＞＜ Gauche のマニュアルだけでは良くわかりませんでした＞＜ サンプルがいっぱいのってるチュートリアルみたいなものがどっかにあれば、、、 スレ違いスミマセン 603:デフォルトの名無しさん 07/10/01 00:27:06 >>594 出力につかっていいの関数は何？使ってる処理系は何？ 最初に聞いた質問にはちゃんと意味があって、こーゆう状況を防ぐために教科書や処理系を聞いてたんだよね。 大抵の環境なら (print (list a b)) と (print counter) にすれば動くと思うけれど。 >>598 そんなコードを見せても意味があるとは思えない。 俺はこの質問者もひょっとしたらモノになるんじゃないかと期待をしているのだよ。
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4316日前に更新/249 KB
担当:undef