게시판 인덱스

 
 FAQFAQ   검색검색   멤버리스트멤버리스트   사용자 그룹사용자 그룹   사용자 등록하기사용자 등록하기 
 개인 정보개인 정보   비공개 메시지를 확인하려면 로그인하십시오비공개 메시지를 확인하려면 로그인하십시오   로그인로그인 

제가 썼던 GC 테스트용 프로그램입니다.

 
이 게시판은 잠겼으므로 글을 올리거나, 답변을 하거나 수정을 할 수 없습니다   이 주제는 잠겼으므로 답변을 하거나 수정을 할 수 없습니다     게시판 인덱스 -> 4190.310 Programming Languages (Fall 2007)
이전 주제 보기 :: 다음 주제 보기  
글쓴이 메시지
하재승
손님





올리기올려짐: 2007년11월5일 17:08    주제: 제가 썼던 GC 테스트용 프로그램입니다. 인용과 함께 답변

코드:
let
    proc fib_r(n) =
        (if n < 2 then 1 else fib_r(n-1)+fib_r(n-2))
in
let
    proc fib(n) =
        let
            a := 1; b := 1; c := 0; i := 0
        in
            while i < n-1 do (c := a+b; b := a; a := c; i:=i+1); a
in
    write fib_r(20);
    write fib(20);
let
    i:=1; j:=1
in
    while i<100 do
    (
        j:=1;
        while j<100 do
        (write ((write i)*(write j)) ; j:=j+1);
        i:=i+1
    )


피보나치 20까지 재귀/비재귀로 구하고, 100*100 구구단표를 찍는프로그램입니다.
위로
남기웅



가입: 2007년 10월 10일
올린 글: 17

올리기올려짐: 2007년11월5일 19:10    주제: 인용과 함께 답변

올려 주셔서 감사합니다~
테스트 셋 올려주시는 분이 최고 멋짐 ^^
위로
사용자 정보 보기 비밀 메시지 보내기 이메일 보내기
이전 글 표시:   
이 게시판은 잠겼으므로 글을 올리거나, 답변을 하거나 수정을 할 수 없습니다   이 주제는 잠겼으므로 답변을 하거나 수정을 할 수 없습니다     게시판 인덱스 -> 4190.310 Programming Languages (Fall 2007) 시간대: GMT + 9 시간(한국)
페이지 11

 
건너뛰기:  
새로운 주제를 올릴 수 없습니다
답글을 올릴 수 없습니다
주제를 수정할 수 없습니다
올린 글을 삭제할 수 없습니다
투표를 할 수 없습니다


Powered by phpBB 2.0.21-7 (Debian) © 2001, 2005 phpBB Group
Translated by kss & drssay