A-M baby

2013-04-10 21:29:02 -07:00 · 2013-04-10 21:29:02 -07:00 · db842d013d
commit db842d013d
parent 764da6cbbb
19005 changed files with 197040 additions and 7 deletions
--- a/Task/Matrix-multiplication/BBC-BASIC/matrix-multiplication.bbc
+++ b/Task/Matrix-multiplication/BBC-BASIC/matrix-multiplication.bbc
@ -0,0 +1,18 @@
+      DIM matrix1(3,1), matrix2(1,2), product(3,2)
+
+      matrix1() = 1, 2, \
+      \           3, 4, \
+      \           5, 6, \
+      \           7, 8
+
+      matrix2() = 1, 2, 3, \
+      \           4, 5, 6
+
+      product() = matrix1() . matrix2()
+
+      FOR row% = 0 TO DIM(product(),1)
+        FOR col% = 0 TO DIM(product(),2)
+          PRINT product(row%,col%),;
+        NEXT
+        PRINT
+      NEXT