Submission #1268567


Source Code Expand

(let* ((n (read))
       (m (read))
       (edges (make-array n :initial-element 0)))
  (loop repeat m
     do
       (let ((a (read))
	     (b (read)))
	 (incf (elt edges (- a 1)))
	 (incf (elt edges (- b 1)))))
  (format t "~:[NO~;YES~]" (every #'evenp edges)))

Submission Info

Submission Time
Task B - Unplanned Queries
User noorbeh
Language Common Lisp (SBCL 1.1.14)
Score 500
Code Size 272 Byte
Status AC
Exec Time 425 ms
Memory 60900 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 500 / 500
Status
AC × 2
AC × 20
Set Name Test Cases
Sample sample1.txt, sample2.txt
All sample1.txt, sample2.txt, in1.txt, in10.txt, in11.txt, in12.txt, in13.txt, in14.txt, in15.txt, in16.txt, in2.txt, in3.txt, in4.txt, in5.txt, in6.txt, in7.txt, in8.txt, in9.txt, sample1.txt, sample2.txt
Case Name Status Exec Time Memory
in1.txt AC 425 ms 60900 KB
in10.txt AC 410 ms 59880 KB
in11.txt AC 360 ms 57696 KB
in12.txt AC 409 ms 59876 KB
in13.txt AC 392 ms 59872 KB
in14.txt AC 409 ms 59876 KB
in15.txt AC 29 ms 6500 KB
in16.txt AC 29 ms 6504 KB
in2.txt AC 409 ms 59876 KB
in3.txt AC 404 ms 59876 KB
in4.txt AC 409 ms 59876 KB
in5.txt AC 409 ms 59880 KB
in6.txt AC 402 ms 59880 KB
in7.txt AC 408 ms 59876 KB
in8.txt AC 410 ms 59876 KB
in9.txt AC 405 ms 59872 KB
sample1.txt AC 29 ms 6500 KB
sample2.txt AC 29 ms 6496 KB