RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/Run-BASIC/loop-over-multiple-arrays-simultaneously.basic
2023-07-01 13:44:08 -04:00

9 lines
121 B
Text

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