RosettaCodeData/Task/Maximum-triangle-path-sum/Zkl/maximum-triangle-path-sum-1.zkl
2023-07-01 13:44:08 -04:00

8 lines
254 B
Text

tri:=File("triangle.txt").pump(List,fcn(s){ s.strip().split(" ").apply("toInt") }).copy();
while(tri.len()>1){
t0:=tri.pop();
t1:=tri.pop();
tri.append( [[(it); t1.enumerate();
'wrap([(i,t)]){ t + t0[i].max(t0[i+1]) }]])
}
tri[0][0].println();