RosettaCodeData/Task/Arrays/BaCon/arrays-3.bacon
2023-07-01 13:44:08 -04:00

5 lines
97 B
Text

SPLIT ARGUMENT$ BY " " TO TOK$ SIZE len_array
FOR i = 1 TO len_array - 1
PRINT TOK$[i]
NEXT i