lisp sum 코드

CL-USER> (defun sum (n) 
           (if (= n 1) 1                                                             
               (+ n (sum (- n 1)))))                                                 
SUM
CL-USER> (sum 100)                                                                   
5050

내가 언어교환한 학생의 코드-ㅅ-..
가르쳐주면서 벌써 다 까먹었다는 사실에 슬퍼했다 (..)

트랙백

이 글과 관련된 글 쓰기 (트랙백 보내기)
TrackbackURL : http://www.xeraph.com/tb/2464396 [도움말]

덧글

댓글 입력 영역