Раз уж пошли "божественные" языки..))

Код AS3:
-module(test).
-export([fizzBuzz/0]).
fizzBuzz() ->
fizzBuzz(1).
fizzBuzz(101)->ok.
fizzBuzz(A)->
if
A rem 3 == 0 && A rem 5 == 0 ->
io:format("FizzBuzz~n", []);
A rem 3 == 0 ->
io:format("Fizz~n", []);
A rem 5 == 0 ->
io:format("Buzz~n", []);
true ->
io:format("~w~n", [A])
end,
fizzBuzz(A+1).
>test:fizzBuzz().
PS:Работоспособность не проверял - могут быть косяки).