8 lines
131 B
Text
8 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
|