市民講座でやってました。 ;最大部分列和問題 ;数列の中で和が最大となる、連続している部分列の和を求める (def x [31,-41,59,26,-53,58,97,-93]) (defn sum [a b] (if (< 0 (+ a b)) (+ a b) 0)) (defn s ([coll-x] (s (next coll-x) (list (first coll-x)…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。