scheme

    0

    1答えて

    私が抱えている問題は、このコードをテストして分析するために使用されていることです。それを実行する以外は、印刷定義に不満があります。それは "print:undefined"と言い続けます この問題に適した印刷定義を私に供給できる人はいますか? (define (integral integrand initial-value dt) (define int (cons-stre

    0

    1答えて

    私はラケットプログラミングの新人です。私は数字のリストが与えられている問題に取り組んでいます。数字の組み合わせのリストを作る必要があります。以下のような 何か: (combine (list 3 1 2)) => (list (list 31 32 33) (list 21 22 3) (list 11 12 13)) は、どの

    1

    2答えて

    forループを使用してforループを再帰関数内で実装しようとしています。すでに実装されている "for"をラケットで使用することはできません。そのようなケースを実装する方法はありますか? 注:私は同じものの中学生言語を使用しています。

    0

    1答えて

    再帰的に動作するマクロを作成しようとしています。 1つのノード(->)または2つの方向(<->)の2つのノード間にリンクを作成する必要があります。私はそれが...の問題だと信じて、それを動作させるように見えることはできません。 作成した構造 (define-struct node (name edges) #:transparent) 理想の例入力と出力 > (edges node1 <->

    0

    1答えて

    リスト内の要素を異なる位置に挿入し、リストとして可能な組み合わせのリストをonly recursionを使って返す方法は誰にでも分かりますか? たとえば、リストは(2 3)、挿入する要素は1です。 出力: list( list (1 2 3) list (2 1 3) list (2 3 1) )

    0

    1答えて

    ここでは、ハッシュテーブルを作成し、それにリストに基づいてベクトルを追加しようとしました。 #<procedure> は今、私はそれが含まれているベクトルの大きさを取得することにより、ハッシュテーブルを照会しようとします: (define *function-table* (make-hash)) (define (function-get key)(hash-ref *function-t

    2

    1答えて

    Schemeの描画ライブラリの感触を得ようとしていますが、私はすでに問題があります。 (define defaultpos (make-posn 400 400)) (start 800 800) (draw-circle defaultpos 10 'green) 理論上、真ん中に緑色の円が描かれた新しいウィンドウが開きます。代わりに、私はこのエラーメッセージが表示されます: draw-

    1

    1答えて

    降順の番号を保持し、昇順の番号を削除する関数を作成したいと考えています。 例: (descending '(6 5 3 1 2 8)) は私に(6 5 3 1)を与えます。 ありがとうございました。

    0

    1答えて

    私は、係数のリストとx値を渡すことで多項式を評価するテール再帰関数を作成しています。 例:x^3 + 2x^2 + 5を評価すると、ユーザーは関数呼び出し(poly '(5 0 2 1)1)でリスト'(5 0 2 1)とxの1を渡します。 )。 私は次のエラー取得していますなぜ私は理解することはできません:あなたは最後の行でpoly-assistant前に左括弧が必要 if: bad syntax

    0

    2答えて

    私はスキーム(R5RS)の学習を始めてすぐに問題に遭遇しました。私はこのコードを持っている:私は何をしようとしている (define make-source (lambda (seq) (define next list) (define peek list) (let ((seq seq) ;(endl (if (null? endl) #f endl)