Largest int from concatenated ints: Difference between revisions
Content added Content deleted
Line 427: | Line 427: | ||
;Output as above. |
;Output as above. |
||
=={{header|Racket}}== |
|||
<lang Racket> |
|||
#lang racket |
|||
(define (largest-int ns) |
|||
(string->number (apply ~a (sort ns (λ(x y) (string>? (~a x y) (~a y x))))))) |
|||
(map largest-int '((1 34 3 98 9 76 45 4) (54 546 548 60))) |
|||
;; -> '(998764543431 6054854654) |
|||
</lang> |
|||
=={{header|REXX}}== |
=={{header|REXX}}== |