FizzBuzz
1234567891011
let fizzbuzz n =
match (n mod 3, n mod 5) with
| (0, 0) -> "FizzBuzz"
| (0, _) -> "Fizz"
| (_, 0) -> "Buzz"
| _ -> string_of_int n
let () =
for i = 1 to 100 do
print_endline (fizzbuzz i)
done
Ocaml
INFO