RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/Run-BASIC/loop-over-multiple-arrays-simultaneously.run

10 lines
121 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
for i = 1 to 3
a$(i) = chr$(i+96)
b$(i) = chr$(i+64)
c(i) = i
next i
for i = 1 to 3
print a$(i);b$(i);c(i)
next