RosettaCodeData/Task/Greatest-subsequential-sum/Racket/greatest-subsequential-sum-2.rkt
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

3 lines
66 B
Racket

> (max-subseq '(-1 -2 3 5 6 -2 -1 4 -4 2 -1))
'(3 5 6 -2 -1 4)
15