Skip to content

Instantly share code, notes, and snippets.

@b4284
Created May 25, 2016 05:25
Show Gist options
  • Select an option

  • Save b4284/e70f5fe94ccc1c19cffe3a816481dcd4 to your computer and use it in GitHub Desktop.

Select an option

Save b4284/e70f5fe94ccc1c19cffe3a816481dcd4 to your computer and use it in GitHub Desktop.
(let ((divisible (lambda (n d) (= 0 (remainder n d)))))
(let A ((i 1))
(if (<= i 100)
(begin
(format #t "~a\t~a~a\n"
i
(if (divisible i 3) "fizz" "")
(if (divisible i 5) "buzz" ""))
(A (+ 1 i))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment