9 lines
199 B
OCaml
9 lines
199 B
OCaml
let fizzbuzz i =
|
|
match i mod 3, i mod 5 with
|
|
0, 0 -> "FizzBuzz"
|
|
| 0, _ -> "Fizz"
|
|
| _, 0 -> "Buzz"
|
|
| _ -> string_of_int i
|
|
|
|
let _ =
|
|
for i = 1 to 100 do print_endline (fizzbuzz i) done
|