Submission #3000234

Source Code Expand

let rec f () =
  let x =
    Scanf.scanf " %s" (function "Left" -> "<" | "Right" -> ">" | "AtCoder" -> "A" | _ -> "") in
  if x = "" then [] else x :: f ()
let _ = f () |> String.concat " " |> print_endline

Submission Info

Submission Time
Task A - スペース高橋君
User lrmystp
Language OCaml (4.02.3)
Score 100
Code Size 210 Byte
Status AC
Exec Time 1 ms
Memory 384 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 3
AC × 14
Set Name Test Cases
Sample example_0.txt, example_1.txt, example_2.txt
All corner_0.txt, corner_1.txt, corner_2.txt, example_0.txt, example_1.txt, example_2.txt, maxrand_0.txt, maxrand_1.txt, maxrand_2.txt, random_0.txt, random_1.txt, random_2.txt, random_3.txt, random_4.txt
Case Name Status Exec Time Memory
corner_0.txt AC 1 ms 384 KB
corner_1.txt AC 1 ms 384 KB
corner_2.txt AC 1 ms 384 KB
example_0.txt AC 1 ms 384 KB
example_1.txt AC 1 ms 384 KB
example_2.txt AC 1 ms 384 KB
maxrand_0.txt AC 1 ms 384 KB
maxrand_1.txt AC 1 ms 384 KB
maxrand_2.txt AC 1 ms 384 KB
random_0.txt AC 1 ms 384 KB
random_1.txt AC 1 ms 384 KB
random_2.txt AC 1 ms 384 KB
random_3.txt AC 1 ms 384 KB
random_4.txt AC 1 ms 384 KB