Anonymous user
Product of Array: Difference between revisions
no edit summary
No edit summary |
|||
Line 169:
(defparameter data #1A(1 2 3 4 5))
(reduce #'* data)
==[[MAXScript]]==
[[Category:MAXScript]]
arr = #(1, 2, 3, 4, 5, 6, 7, 8, 9)
product = 1
for i in arr do product *= i
==[[OCaml]]==
| |||