Connect Digits by akouryy

-module(a).
-export([m/0]).
f([A,B|C])->D=round((B-A)/abs(B-A-0.1)),lists:seq(A,B-D,D)++f([B|C]);f(A)->A.
m()->io:fwrite(f(io:get_line(""))).

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)

download

return to the top page