結果
問題 | No.477 MVP |
ユーザー | ichibanshibori |
提出日時 | 2017-01-27 22:44:50 |
言語 | OCaml (5.1.0) |
結果 |
CE
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 324 bytes |
コンパイル時間 | 211 ms |
コンパイル使用メモリ | 16,384 KB |
最終ジャッジ日時 | 2023-07-30 07:02:21 |
合計ジャッジ時間 | 678 ms |
ジャッジサーバーID (参考情報) |
judge13 / judge14 |
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
File "Main.ml", line 1, characters 5-8: 1 | open Num ^^^ Error: Unbound module Num
ソースコード
open Num let readln_t2_by f = let ( @@ ) lst n = List.nth lst n in read_line () |> Str.split (Str.regexp_string " ") |> List.map f |> fun lst -> (lst @@ 0, lst @@ 1) let () = let n, k = readln_t2_by num_of_string in let ans = floor_num (n // (k +/ Int 1)) +/ (Int 1) in print_endline (string_of_num ans)