FizzBuzz
123456789101112131415
#!/usr/bin/env escript
%%! -smp enable -noshell
main(_) ->
lists:foreach(
fun(N) ->
case {N rem 3, N rem 5} of
{0,0} -> io:format("FizzBuzz~n");
{0,_} -> io:format("Fizz~n");
{_,0} -> io:format("Buzz~n");
_ -> io:format("~p~n", [N])
end
end,
lists:seq(1, 100)
).
Erlang
INFO