4 lines
102 B
Text
4 lines
102 B
Text
(DO ((I 1 (+ I 1))) ((> I 5))
|
|
(DO ((J 0 (+ J 1))) ((= J I))
|
|
(DISPLAY "*"))
|
|
(NEWLINE))
|