Data update

Task/Greatest-subsequential-sum/Pluto/greatest-subsequential-sum.pluto

@@ -0,0 +1,32 @@
+local function gss(s)
+    local best = 0
+    local start = 1
+    local finish = 1
+    local sum = 0
+    local sum_start = 1
+    for i, x in s do
+        sum += x
+        if sum > best then
+            best = sum
+            start = sum_start
+            finish = i + 1
+        elseif sum < 0 then
+            sum = 0
+            sum_start = i + 1
+        end
+    end
+    return s:slice(start, finish - 1), best
+end
+
+local tests = {
+    {-1, -2, 3, 5, 6, -2, -1, 4, -4, 2, -1},
+    {-1, 1, 2, -5, -6},
+    {},
+    {-1, -2, -1}
+}
+for tests as test do
+    print($"Input:   \{{test:concat(", ")}}")
+    local subseq, sum = gss(test)
+    print($"Sub seq: \{{subseq:concat(", ")}}")
+    print($"Sum:     {sum}\n")
+end