Zählschleife

Aus ProgrammingWiki

Scheme lässt multiparadigmatische Problemlösungen zu.
Beispielsweise lassen sich klassische Zählschleifen konstruieren.

Summe ganzer Zahlen

(define summe (lambda (von bis) (do ((i von (+ i 1)) (sum 0 (+ sum i))) ((> i bis) sum))))

(summe 0 100)

ausführen

Fakultätsfunktion

(define fak (lambda (n) (do ((i 1 (+ i 1)) (prod 1 (* prod i))) ((> i n) prod))))

(fak 10)

ausführen