Difference between r1.1 and the current
@@ -1,5 +1,11 @@
{{{
(define (pascal r c)(cond ((= c 1) 1)
((= r c) 1)
(else (+ (pascal (- r 1) c)
(pascal (- r 1) (- c 1))))))
}}}
----
문제는 내가 scheme 시스템에서 stdin stdout 을 어떻게 다루는지 몰라서 그냥 함수만 만들었다는 점.
----
[파스칼삼각형]
(define (pascal r c) (cond ((= c 1) 1) ((= r c) 1) (else (+ (pascal (- r 1) c) (pascal (- r 1) (- c 1))))))
