#!reader=srfi/49 (import (srfi 49)) import srfi 1 displ […]
#!reader=srfi/49 (import (srfi 49)) import srfi 1 displ […]
#!reader=srfi/49(import (srfi 49))importsrfi 1displaystring-joinlist-tabulate 100lambda (i)let ((i (+ 1 i)))(let ((isFizz (= 0 (mod i 3)))(isBuzz (= 0 (mod i 5))))(cond((and isFizz isBuzz)"Fizz Buzz")(isFizz"Fizz")(isBuzz"Buzz")(else(number->string i))))"\n"(newline)