RosettaCodeData/Task/Repeat-a-string/Liberty-BASIC/repeat-a-string.basic
2023-07-01 13:44:08 -04:00

12 lines
171 B
Text

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