(define n (read)) (map (cond ((= (mod a 15) 0) (display "FizzBuzz")) ((= (mod a 3) 0) (display "Fizz")) ((= (mod a 5) 0) (display "Buzz")) (else (display a)) ) (iota n) )