VFMUL_tested.erl

-module(tested).
-export([main/0]).

main() ->
    io:get_line(""),
    vfmul().

multiply(Line) ->
    {X,[_|Ystr]} = string:to_integer(Line),
    {Y,_} = string:to_integer(Ystr),
    X + Y.


vfmul() ->
    case io:get_line("") of
        {error, Why} -> io:format(Why);
        Line -> io:format("~w~n", [multiply(Line)]), vfmul()
    end.