tasks a-s
This commit is contained in:
parent
47bf37c096
commit
b83f433714
12433 changed files with 156208 additions and 123 deletions
12
Task/Repeat-a-string/Liberty-BASIC/repeat-a-string.liberty
Normal file
12
Task/Repeat-a-string/Liberty-BASIC/repeat-a-string.liberty
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
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
|
||||
Loading…
Add table
Add a link
Reference in a new issue