Submission #1780906

Source Code Expand

(define (main args)
  (let* ([a (read)]
         [b (read)])
    (print (if (eq? a b) 'H 'D)))
  0)

Submission Info

Submission Time
Task A - HonestOrDishonest
User ducktail
Language Scheme (Gauche 0.9.3.3)
Score 100
Code Size 105 Byte
Status AC
Exec Time 36 ms
Memory 5844 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 3
AC × 4
Set Name Test Cases
Sample 0_000.txt, 0_001.txt, 0_002.txt
All 0_000.txt, 0_001.txt, 0_002.txt, 1_003.txt
Case Name Status Exec Time Memory
0_000.txt AC 36 ms 5844 KB
0_001.txt AC 6 ms 2940 KB
0_002.txt AC 6 ms 2940 KB
1_003.txt AC 6 ms 2940 KB