Name: Anonymous 2008-09-29 13:09
print "dongs" five times in your favorite language
with extreme conciseness/verbosity
with extreme conciseness/verbosity
(define (five-dongs)
(letrec ((n-dongs (lambda (num results)
(cond ((> num 0) (n-dongs (- num 1) (append results '(dongs))))
(else results)))))
(display (n-dongs 5 '()))))