% Consultar documentação do módulo random em:
% http://www.erlang.org/doc/doc-5.5.4/lib/stdlib-1.14.4/doc/html/index.html

gera_aleatorios() ->
    {X,Y,Z} = now(),
    random:seed(X,Y,Z),
    gera(10).

gera(0) ->
    ok;
gera(N) ->
    Valor = valor(random:uniform(100)),
    io:format("Valor : ~w~n",[Valor]),
    gera(N-1).

valor(V) when V > 80 -> 'erro';
valor(V) -> V.