Help for this page

Select Code to Download

Select or download this

(defun sum (n)
  (let ((s 0))
    (dotimes (i n s)
      (incf s i))))