RosettaCodeData/Task/Dot-product/BBC-BASIC/dot-product.bbc
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

7 lines
149 B
Text

DIM vec1(2), vec2(2), dot(0)
vec1() = 1, 3, -5
vec2() = 4, -2, -1
dot() = vec1() . vec2()
PRINT "Result is "; dot(0)