오평석
가입: 2014년 10월 17일 올린 글: 8
|
올려짐: 2014년11월16일 20:26 주제: hw 6-2 테스트케이스 하나 공유해봅니다 |
|
|
코드: |
(rec psfibo x =>
ifzero (x.1 and 1) then x.2+0
else (
ifzero ((x.1-1) and 2) then x.2+1
else (
ifzero (0 and (psfibo (2,3)))
then ( psfibo(x.1-1,x.2) + psfibo(x.1-2,x.2) )
else 0 (* this case will not be happend. *)
)
)
) (3,2)
(* psfibo is fibonacci seq. with some weight *)
(* a0 = x.2, a1 = x.2+1, an = a(n-1) + a(n-2) *)
(* if input (3,2), the result is 8, because a0=2, a1=3, a2=5, a3=8. *)
|
모든 문법을 한번 이상 사용하는 걸 전제로 짜보았습니다.
reduce까지 돌려보면, 8이 나오는 거 같아요.
마찬가지로 (4,3)을 넣으면 18이 나올겁니다. 같이 확인해보아요 |
|