Submission #2248227


Source Code Expand

(declaim (optimize (speed 3) (safety 0) (debug 0)))
(defun solve (n a b)
  (cond
    ((> a b) 0)
    ((= n 1) (if (= a b) 1 0))
    (t (1+ (* (- n 2) (- b a))))))
(format t "~A~%" (solve (read) (read) (read)))

Submission Info

Submission Time
Task A - A+...+B Problem
User qjr
Language Common Lisp (SBCL 1.1.14)
Score 200
Code Size 215 Byte
Status AC
Exec Time 17 ms
Memory 3812 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 200 / 200
Status
AC × 4
AC × 12
Set Name Test Cases
Sample s1.txt, s2.txt, s3.txt, s4.txt
All 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt, 07.txt, 08.txt, s1.txt, s2.txt, s3.txt, s4.txt
Case Name Status Exec Time Memory
01.txt AC 17 ms 3812 KB
02.txt AC 10 ms 3428 KB
03.txt AC 10 ms 3428 KB
04.txt AC 10 ms 3428 KB
05.txt AC 10 ms 3432 KB
06.txt AC 10 ms 3424 KB
07.txt AC 10 ms 3428 KB
08.txt AC 10 ms 3428 KB
s1.txt AC 10 ms 3424 KB
s2.txt AC 10 ms 3428 KB
s3.txt AC 10 ms 3432 KB
s4.txt AC 10 ms 3428 KB