HTBasic Help
×
Menu
Index
Search
 
   
   
   
 
  (c) TransEra Corp, 2021

rank Example

10    OPTION BASE 1
20    DIM A(16,6)
30    DIM B(5,7,3)
40    CLEAR SCREEN
50    Pass_a(A(*))
60    Pass_a(B(*))
70    END
80    SUB Pass_a(REAL A(*))
90      L=RANK(A)
100     PRINT "The array passed in has the following rank."
110     PRINT "Rank: ";L
120   SUBEND