17 lines
311 B
Plaintext
17 lines
311 B
Plaintext
import <Utilities/Conversion.sl>;
|
|
import <Utilities/Sequence.sl>;
|
|
|
|
main(args(2)) :=
|
|
let
|
|
result[i] :=
|
|
"FizzBuzz" when i mod 3 = 0 and i mod 5 = 0
|
|
else
|
|
"Fizz" when i mod 3 = 0
|
|
else
|
|
"Buzz" when i mod 5 = 0
|
|
else
|
|
intToString(i)
|
|
foreach i within 1 ... 100;
|
|
in
|
|
delimit(result, '\n');
|