Language Test

Submission #1287389

Source codeソースコード

let print_answer x =
  if x < 0 then Printf.printf "%s %d\n" "West" (-x)
  else if x > 0 then Printf.printf "%s %d\n" "East" x
  else Printf.printf "0\n"


let () =
  let n, a, b = Scanf.scanf "%d %d %d\n" (fun x y z -> (x, y, z)) in
  let move s d =
    let d' = if d <= a then a else if b <= d then b else d in
    if s = "West" then (-d') else d' in
  let rec iter c p =
    if c = 0 then p
    else
      begin
        let s, d = Scanf.scanf "%s %d\n" (fun x y -> (x, y))in
        let p' = p + move s d in
        iter (c-1) p'
      end
  in
  print_answer (iter n 0)

Submission

Task問題 G - 双子とスイカ割り
User nameユーザ名 ducktail
Created time投稿日時
Language言語 OCaml (4.02.3)
Status状態 AC
Score得点 100
Source lengthソースコード長 597 Byte
File nameファイル名
Exec time実行時間 1 ms
Memory usageメモリ使用量 384 KB

Test case

Set

Set name Score得点 / Max score Cases
Sample - sample-01.txt,sample-02.txt,sample-03.txt
All 100 / 100 sample-01.txt,sample-02.txt,sample-03.txt,test-01.txt,test-02.txt,test-03.txt,test-04.txt,test-05.txt,test-06.txt,test-07.txt,test-08.txt,test-09.txt,test-10.txt,test-11.txt,test-12.txt,test-13.txt,test-14.txt,test-15.txt,test-16.txt,test-17.txt,test-18.txt,test-19.txt,test-20.txt,test-21.txt,test-22.txt,test-23.txt,test-24.txt,test-25.txt,test-26.txt,test-27.txt,test-28.txt,test-29.txt,test-30.txt,sample-01.txt,sample-02.txt,sample-03.txt

Test case

Case name Status状態 Exec time実行時間 Memory usageメモリ使用量
sample-01.txt AC 1 ms 384 KB
sample-02.txt AC 1 ms 384 KB
sample-03.txt AC 1 ms 384 KB
test-01.txt AC 1 ms 384 KB
test-02.txt AC 1 ms 384 KB
test-03.txt AC 1 ms 384 KB
test-04.txt AC 1 ms 384 KB
test-05.txt AC 1 ms 384 KB
test-06.txt AC 1 ms 384 KB
test-07.txt AC 1 ms 384 KB
test-08.txt AC 1 ms 384 KB
test-09.txt AC 1 ms 384 KB
test-10.txt AC 1 ms 384 KB
test-11.txt AC 1 ms 384 KB
test-12.txt AC 1 ms 384 KB
test-13.txt AC 1 ms 384 KB
test-14.txt AC 1 ms 384 KB
test-15.txt AC 1 ms 384 KB
test-16.txt AC 1 ms 384 KB
test-17.txt AC 1 ms 384 KB
test-18.txt AC 1 ms 384 KB
test-19.txt AC 1 ms 384 KB
test-20.txt AC 1 ms 384 KB
test-21.txt AC 1 ms 384 KB
test-22.txt AC 1 ms 384 KB
test-23.txt AC 1 ms 384 KB
test-24.txt AC 1 ms 384 KB
test-25.txt AC 1 ms 384 KB
test-26.txt AC 1 ms 384 KB
test-27.txt AC 1 ms 384 KB
test-28.txt AC 1 ms 384 KB
test-29.txt AC 1 ms 384 KB
test-30.txt AC 1 ms 384 KB