Submission #1418726

Source Code Expand

(defun calc (n k x y)
  (if (<= n k) (* n x) (+ (* k x) (* (- n k) y)))
)

(write (calc (read) (read) (read) (read)))

Submission Info

Submission Time
Task A - Tak and Hotels (ABC Edit)
User m_buyoh
Language Common Lisp (SBCL 1.1.14)
Score 100
Code Size 121 Byte
Status AC
Exec Time 33 ms
Memory 4836 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 2
AC × 10
Set Name Test Cases
Sample example_01.txt, example_02.txt
All example_01.txt, example_02.txt, subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt
Case Name Status Exec Time Memory
example_01.txt AC 33 ms 4836 KB
example_02.txt AC 10 ms 3432 KB
subtask1_01.txt AC 10 ms 3424 KB
subtask1_02.txt AC 10 ms 3424 KB
subtask1_03.txt AC 10 ms 3428 KB
subtask1_04.txt AC 10 ms 3428 KB
subtask1_05.txt AC 10 ms 3428 KB
subtask1_06.txt AC 10 ms 3428 KB
subtask1_07.txt AC 10 ms 3428 KB
subtask1_08.txt AC 10 ms 3428 KB