RosettaCodeData/Task/Repeat-a-string/Liberty-BASIC/repeat-a-string.basic

13 lines
171 B
Plaintext

a$ ="ha "
print StringRepeat$( a$, 5)
end
function StringRepeat$( in$, n)
o$ =""
for i =1 to n
o$ =o$ +in$
next i
StringRepeat$ =o$
end function