アプリ版:「スタンプのみでお礼する」機能のリリースについて

LISPの問題ですが、ハノイのプログラムはここまでできております。
> (defun hanoi (n a b c)
(cond ((= n 1) (print (list "move" n "from" a "to" c)))
((> n 1) (hanoi (1- n) a c b)
(print (list "move" n "from" a "to" c))
(hanoi (1- n) b a c))))

実行結果を出すには、どんなプログラムが入力すればよいのでしょうか。
すみませんが、力を貸してください。

A 回答 (2件)

>エラーがでます。


どんなエラーがでますか?
メッセージを補足して下さい。
例えば、printという関数はありますか?
なければ、write に置き換えてみて下さい。

この回答への補足

このようなエラーがでます。
Error: 1 is invalid as a function.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by COND.
Broken at HANOI. Type :H for Help.
と表示されます。
原因は分かるでしょうか??

補足日時:2005/11/14 07:23
    • good
    • 0

(hanoi 3 'a 'b 'c)

この回答への補足

ご回答有難うございます。どうにか実行できました。しかし、エラーがでます。
私がやったプログラムはどこが違うのでしょうか??
すみませんが、よろしくお願いします。

補足日時:2005/11/13 22:00
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!