Submission #4334689
Source Code Expand
open Printf open Scanf
open Array
let cost = [|0;2;5;5;4;5;6;3;7;6|]
let () = scanf " %d %d" @@ fun n m ->
let a = init m (fun _ -> scanf " %d" @@ fun v -> v) in
let maxstr u v =
match compare (String.length u) (String.length v) with
| 1 -> u
| -1 -> v
| _ -> max u v
in
let dp = make (n+1) "" in
dp.(n) <- "0";
for j=n downto 0 do
if dp.(j) <> "" then (
iter (fun i ->
let c = cost.(i) in
if j-c >= 0 then
dp.(j-c) <- maxstr
dp.(j-c)
(dp.(j) ^ (string_of_int i))
) a
)
done;
(* iter (print_endline) dp; *)
print_string @@ String.(sub dp.(0) 1 (length dp.(0) - 1))
Submission Info
| Submission Time | |
|---|---|
| Task | D - Match Matching |
| User | sk0 |
| Language | OCaml (4.02.3) |
| Score | 400 |
| Code Size | 700 Byte |
| Status | AC |
| Exec Time | 88 ms |
| Memory | 59552 KiB |
Judge Result
| Set Name | All | Sample | ||||
|---|---|---|---|---|---|---|
| Score / Max Score | 400 / 400 | 0 / 0 | ||||
| Status |
|
|
| Set Name | Test Cases |
|---|---|
| All | 0_random_1, 0_random_2, 0_random_3, 0_random_4, 0_random_5, 0_random_6, 0_random_7, 0_random_8, 1_normal_1, 1_normal_2, 1_normal_3, 1_normal_4, 1_normal_5, 1_normal_6, 2_corner_1, 2_corner_2, 2_corner_3, 2_corner_4, 2_corner_5, 2_corner_6, 3_hand_1, 3_hand_2, 3_hand_3, 3_hand_4, 3_hand_5, 3_hand_6, sample_01, sample_02, sample_03 |
| Sample | sample_01, sample_02, sample_03 |
| Case Name | Status | Exec Time | Memory |
|---|---|---|---|
| 0_random_1 | AC | 1 ms | 384 KiB |
| 0_random_2 | AC | 1 ms | 384 KiB |
| 0_random_3 | AC | 5 ms | 2944 KiB |
| 0_random_4 | AC | 35 ms | 44540 KiB |
| 0_random_5 | AC | 49 ms | 38272 KiB |
| 0_random_6 | AC | 26 ms | 23552 KiB |
| 0_random_7 | AC | 2 ms | 1536 KiB |
| 0_random_8 | AC | 1 ms | 512 KiB |
| 1_normal_1 | AC | 7 ms | 5888 KiB |
| 1_normal_2 | AC | 20 ms | 11264 KiB |
| 1_normal_3 | AC | 10 ms | 5760 KiB |
| 1_normal_4 | AC | 34 ms | 34432 KiB |
| 1_normal_5 | AC | 23 ms | 33792 KiB |
| 1_normal_6 | AC | 13 ms | 5632 KiB |
| 2_corner_1 | AC | 7 ms | 3840 KiB |
| 2_corner_2 | AC | 2 ms | 640 KiB |
| 2_corner_3 | AC | 14 ms | 8704 KiB |
| 2_corner_4 | AC | 3 ms | 1792 KiB |
| 2_corner_5 | AC | 2 ms | 640 KiB |
| 2_corner_6 | AC | 6 ms | 5632 KiB |
| 3_hand_1 | AC | 13 ms | 10624 KiB |
| 3_hand_2 | AC | 1 ms | 384 KiB |
| 3_hand_3 | AC | 1 ms | 384 KiB |
| 3_hand_4 | AC | 1 ms | 384 KiB |
| 3_hand_5 | AC | 1 ms | 384 KiB |
| 3_hand_6 | AC | 88 ms | 59552 KiB |
| sample_01 | AC | 1 ms | 384 KiB |
| sample_02 | AC | 1 ms | 512 KiB |
| sample_03 | AC | 1 ms | 384 KiB |