10 lines
201 B
Text
10 lines
201 B
Text
|
|
uses console
|
||
|
|
|
||
|
|
'indexbase 1 by default
|
||
|
|
dim fruit(2) as string = {"apple", "orange"}
|
||
|
|
|
||
|
|
dim length as integer = ubound(fruit) - lbound(fruit) + 1
|
||
|
|
print "The length of the fruit array is ", length
|
||
|
|
|
||
|
|
waitkey
|