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