Largest int from concatenated ints: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: used SPACE bif instead of STRIP bif, changed indentations. -- ~~~~) |
(Added Erlang) |
||
Line 249: | Line 249: | ||
<pre>[["998764543431", "6054854654"], ["998764543431", "6054854654"], ["998764543431", "6054854654"]]</pre> |
<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}}== |
=={{header|Go}}== |