RosettaCodeData/Task/Dot-product/Craft-Basic/dot-product.basic
2023-07-01 13:44:08 -04:00

12 lines
112 B
Text

dim a[1, 3, -5]
dim b[4, -2, -1]
arraysize n, a
for i = 0 to n - 1
let s = s + a[i] * b[i]
next i
print s