ocaml-nagoya #3819(2007/11/10 15:35 GMT) [ Scheme ] Rating5/5=1.00
循環リストで。
1 2 3 4 5 6 7
use srfi-1) (define (fizzbuzz n) (for-each (lambda (a b) (print a ":" b)) (iota n 1) (circular-list 'hoge 'hoge 'Fizz 'hoge 'Buzz 'Fizz 'hoge 'hoge 'Fizz 'Buzz 'hoge 'Fizz 'hoge 'hoge 'FizzBuzz))) (fizzbuzz 20)
Rating5/5=1.00-0+
[ reply ]
ocaml-nagoya #3819() [ Scheme ] Rating5/5=1.00
Rating5/5=1.00-0+
[ reply ]