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

10 lines
121 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04: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