Connect Digits by Kombu

-module(n).
-export([m/0]).
m()->io:format(f(io:get_line(""))).
f([A|[B|T]])when abs(A-B)>1->f([A,(A+B)div 2,B]++T);f([H|T])->[H]++f(T);f(A)->A.

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