RosettaCodeData/Task/Loops-Foreach/BASIC/loops-foreach-14.basic
2019-09-12 10:33:56 -07:00

5 lines
95 B
Text

Local i,strs
Define strs = {"Lorem","ipsum","dolor"}
For i, 1, dim(strs)
Disp strs[i]
EndFor