Lisp Scheme Part41 (856レス)
上下前次1-新
438: 2021/07/20(火)02:01 ID:DJlNseKm(1/4) AAS
すみませんscheme初心者なのですが累乗を求めるプログラムが動きません
外部リンク[html]:www.nct9.ne.jp
を参考に、let と cond を使って書いてみたのですが let で局所変数を導入した瞬間に動かなくなりました
何が間違っているのか指摘していただけると幸いです
(define (pow x y)
(let ((z (pow x (quotient y 2))))
(cond ((zero? y) 1)
((zero? (modulo y 2)) (* z z))
(else (* x z z))
)
)
)
上下前次1-新書関写板覧索設栞歴
あと 418 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.013s