7 lines
131 B
Text
7 lines
131 B
Text
dim fruta$(3)
|
|
read fruta$(1), fruta$(2), fruta$(3)
|
|
data "apple", "orange", "pear"
|
|
|
|
print arraysize(fruta$(),1)
|
|
print fruta$(2)
|
|
end
|