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

10 lines
121 B
Plaintext

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