Scheme Write a procedure in Scheme called multiples that takes two parameters: b

Question

Scheme

Write a procedure in Scheme called multiples that takes two parameters: base (assume it is positive) and N. Return a list of all positive whole-number multiples of base less than or equal to N.

One approach is to think of this as an application of map. This is not the only approach.

scheme@(guile-user)> (multiples 2 9)

$8 = (2 4 6 8)

This code was provided in a previous post but returns an #<unspecified> error when running: (multiples 2 9)

(define (multiples n f)
(if (= 0 (remainder n f))
f
(if (< f n)
(multiples n (+ f 1))
)))

Explanation / Answer

define mult-it (lambda (the-list) (let ((result 1)) (begin (for-each (lambda (x) (set! result (* result x))) the-list) result))))

Related Questions

Navigate

• Browse (All)
• Browse S
• Subjects

Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.