Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Matrix-transposition/BBC-BASIC/matrix-transposition.basic
+++ b/Task/Matrix-transposition/BBC-BASIC/matrix-transposition.basic
@ -0,0 +1,22 @@
+      INSTALL @lib$+"ARRAYLIB"
+
+      DIM matrix(3,4), transpose(4,3)
+      matrix() = 78,19,30,12,36,49,10,65,42,50,30,93,24,78,10,39,68,27,64,29
+
+      PROC_transpose(matrix(), transpose())
+
+      FOR row% = 0 TO DIM(matrix(),1)
+        FOR col% = 0 TO DIM(matrix(),2)
+          PRINT ;matrix(row%,col%) " ";
+        NEXT
+        PRINT
+      NEXT row%
+
+      PRINT
+
+      FOR row% = 0 TO DIM(transpose(),1)
+        FOR col% = 0 TO DIM(transpose(),2)
+          PRINT ;transpose(row%,col%) " ";
+        NEXT
+        PRINT
+      NEXT row%