プログラミングの基礎:問題5.2解答
(* 目的 :受け取った時間xが午前か午後かを計算する *) (* jikan : int -> string *) let jikan x = if x >= 12 then "午後" else "午前" (* テスト *) let test1 = jikan 0 = "午前" let test2 = jikan 12 = "午後" let test3 = jikan 13 = "午後"
(* 目的 :受け取った時間xが午前か午後かを計算する *) (* jikan : int -> string *) let jikan x = if x >= 12 then "午後" else "午前" (* テスト *) let test1 = jikan 0 = "午前" let test2 = jikan 12 = "午後" let test3 = jikan 13 = "午後"