개발 연습 블로그

working with lists 1. 리스트 마지막 원소 let rec last = function |[] -> None |[x] -> Some x |h::t -> last t 2. 마지막 2개 원소 let rec last_two = function |[] |[_] -> None |[a; b] -> Some (a,b) |h::t -> last_two t 3. 리스트 n번째 원소 let rec at n = function |[] -> None |h::t -> if n>1 then at (n-1) t else Some h 4. 리스트 길이 let rec length = function |[] -> 0 |h::t -> 1 + length t (*tail recursive*) let length lst = l..

선택 정렬 (* 1. (최솟값, 나머지 list) 이렇게 리턴하는 함수 정의 val select : 'a -> 'a list -> 'a * 'a list = *) let rec select min = function |[] -> min, [] |h::t -> let min,h = if h 최솟값 :: (정렬된 나머지 리스트) val sort : 'a list -> 'a list ..

🐫 문제 풀다가 새롭게 알게 된 문법 정리 입력 read_int ( ) //입력 끝까지 한줄씩 읽어들여서 List로 만들어 반환 let rec read_lines () = try let line = read_line () in int_of_string (line) :: read_lines() with End_of_file -> [] 출력 print_newline ( ) : \n 출력 print_endline line : 자바 println 같은 것. line의 타입은 반드시 string print_타입명 x : 예를들면 print_int 5 Printf.printf "Hello : %d " 5 반복문 여태까지 모르고 무조건 재귀로만 구현했었는데 반복문이 있긴 있었나보다 파일 로드 (1) 인터프리터에 로드..