Submission #1781250

Source Code Expand

(define (main args)
  (let* ([w (read)]
         [a (read)]
         [b (read)])
    (let ([x (- a b w)]
          [y (- b a w)])
      (print
       (cond [(>= x 0) x]
             [(>= y 0) y]
             [else 0]))))
  0)

Submission Info

Submission Time
Task B - NarrowRectanglesEasy
User ducktail
Language Scheme (Gauche 0.9.3.3)
Score 200
Code Size 237 Byte
Status AC
Exec Time 8 ms
Memory 3068 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 200 / 200
Status
AC × 4
AC × 10
Set Name Test Cases
Sample 0_000.txt, 0_001.txt, 0_002.txt, 0_003.txt
All 0_000.txt, 0_001.txt, 0_002.txt, 0_003.txt, 1_004.txt, 1_005.txt, 1_006.txt, 1_007.txt, 1_008.txt, 1_009.txt
Case Name Status Exec Time Memory
0_000.txt AC 8 ms 3068 KB
0_001.txt AC 6 ms 2940 KB
0_002.txt AC 6 ms 2940 KB
0_003.txt AC 6 ms 2940 KB
1_004.txt AC 6 ms 2940 KB
1_005.txt AC 6 ms 2940 KB
1_006.txt AC 6 ms 2940 KB
1_007.txt AC 6 ms 2940 KB
1_008.txt AC 6 ms 2940 KB
1_009.txt AC 6 ms 2940 KB