10 DECLARE STRING NAMES$(3) 20 LET NAMES$(1) = "Fred" 30 LET NAMES$(2) = "Wilma" 40 LET NAMES$(3) = "Barney" 50 REDIM NAMES$(4) ! Make room for Betty 60 LET NAMES$(4) = "Betty" 70 LET NUMOFNAMES = ROWSIZE(NAMES$) 80 PRINT NUMOFNAMES
10 DECLARE NUMERIC SQROFTWOLOOKUP(3,2) 20 LET SQROFTWOLOOKUP (1,1) = 1 30 LET SQROFTWOLOOKUP (1,2) = 2 40 LET SQROFTWOLOOKUP (2,1) = 2 50 LET SQROFTWOLOOKUP (2,2) = 4 60 LET SQROFTWOLOOKUP (3,1) = 3 70 LET SQROFTWOLOOKUP (3,2) = 8 80 LET NUMOFSQRS = ROWSIZE(SQROFTWOLOOKUP) 90 PRINT NUMOFSQRS