Sum and product of an array: Difference between revisions

Content added Content deleted
Line 664: Line 664:
#var sum := list summarize:(Integer new).
#var sum := list summarize:(Integer new).
#var product := list accumulate:(Integer new:1) &with:(:var:val) [ var *= val ].
#var product := list accumulate:(Integer new:1) &with:(:var:val) [ var * val ].
].</lang>
].</lang>


Retrieved from "https://rosettacode.org/wiki/Sum_and_product_of_an_array"