Anonymous user
Largest int from concatenated ints: Difference between revisions
Largest int from concatenated ints (view source)
Revision as of 11:00, 25 October 2013
, 10 years agoAdded Erlang
m (→{{header|REXX}}: used SPACE bif instead of STRIP bif, changed indentations. -- ~~~~) |
(Added Erlang) |
||
Line 249:
<pre>[["998764543431", "6054854654"], ["998764543431", "6054854654"], ["998764543431", "6054854654"]]</pre>
=={{header|Erlang}}==
<lang Erlang>
-module( largest_int_from_concatenated ).
-export( [ints/1, task/0] ).
ints( Ints ) ->
Int_strings = [erlang:integer_to_list(X) || X <- Ints],
Pad_ints = [{X ++ X, X} || X <- Int_strings],
erlang:list_to_integer( lists:append([Int || {_Pad, Int} <- lists:reverse(lists:sort(Pad_ints))]) ).
task() ->
[io:fwrite("Largest ~p from ~p~n", [ints(X), X]) || X <- [[1, 34, 3, 98, 9, 76, 45, 4], [54, 546, 548, 60]]].
</lang>
{{out}}
<pre>
8> largest_int_from_concatenated:task().
Largest 998764543431 from [1,34,3,98,9,76,45,4]
Largest 6054854654 from [54,546,548,60]
</pre>
=={{header|Go}}==
| |||