Looping: DOTIMES

> (defun promise (n)

"Prints a promise N times."

(let ((the-promise

"I will balance parentheses"))

(dotimes (i n)

(format t "~d. ~A.~%" i the-promise)

) ) )

PROMISE

> (promise 3)

0. I will balance parentheses.

1. I will balance parentheses.

2. I will balance parentheses.

NIL

>

Previous slide

Next slide

Back to first slide

View graphic version