RosettaCodeData/Task/Loops-Foreach/BASIC/loops-foreach-14.basic

6 lines
95 B
Plaintext

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