DIM fruit$(2)
MAT READ fruit$
DATA "apple", "orange"

PRINT "The length of the array 'fruit$' is "; SIZE(fruit$)
END