Submission #1572325

Source Code Expand

(defun br()
        (princ '#\newline))

(defun solve()
        (let ((s (read)))
                (princ (string-downcase s))
                (princ '"pp")
                (br)))

(solve)

Submission Info

Submission Time
Task A - ハンドルネーム
User lsp
Language Common Lisp (SBCL 1.1.14)
Score 100
Code Size 200 Byte
Status AC
Exec Time 9 ms
Memory 3296 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 7
Set Name Test Cases
All sample_01.txt, sample_02.txt, test_aaaaaaaaaa.txt, test_myonmyon.txt, test_nemui.txt, test_onakasuita.txt, test_p.txt
Case Name Status Exec Time Memory
sample_01.txt AC 9 ms 3296 KB
sample_02.txt AC 9 ms 3172 KB
test_aaaaaaaaaa.txt AC 9 ms 3176 KB
test_myonmyon.txt AC 9 ms 3168 KB
test_nemui.txt AC 9 ms 3172 KB
test_onakasuita.txt AC 9 ms 3172 KB
test_p.txt AC 9 ms 3168 KB