Pascal三角形を計算する関数を作成せよ
関数自体は簡単に出来た。
; 1〜n行, 1〜n列 目のパスカル三角形の値を返す ; 範囲外の場合は0を返す (define (pascals-triangle row col) (cond ((> col row) 0) ((= col 1) 1) ((= row col) 1) (else (+ (pascals-triangle (- row 1) (- col 1)) (pascals-triangle (- row 1) col)))))
三角形をコンソールに表示しようと思ったが、うまくいかずに挫折...。
display関数がうまく使えない...。