UA-69169170-1 FizzBuzz | Daniel Hensel

FizzBuzz

Hier ein FizzBuzz von mir in CommonLisp:
(defun fizzbuzz ()
(loop for i from 1 to 100 do
(cond ((zerop (mod i 15)) (print 'FizzBuzz))
((zerop (mod i 3)) (print 'Fizz))
((zerop (mod i 5)) (print 'Buzz))
(t (print i)))))

Und hier ein FizzBuzz in SuperCollider, die musikalische Variante folgt noch:

Dieser Code wurde von mir auf RosettaCode veröffentlicht:

var i = 0;
(1..100).do({ i = i + 1;
case
{(i%15==0)} {"FizzBuzz".postln}
{(i%3==0)} {"Fizz".postln}
{(i%5==0)} {"Buzz".postln}
{i.postln};
})
)