RosettaCodeData/Task/Repeat-a-string/Run-BASIC/repeat-a-string.run

7 lines
68 B
Plaintext

a$ = "ha "
for i = 1 to 5
a1$ = a1$ + a$
next i
a$ = a1$
print a$