Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
8
Task/Repeat-a-string/IS-BASIC/repeat-a-string.basic
Normal file
8
Task/Repeat-a-string/IS-BASIC/repeat-a-string.basic
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
10 PRINT STRING$("ha",5)
|
||||
100 DEF STRING$(S$,N)
|
||||
105 LET ST$=""
|
||||
110 FOR I=1 TO N
|
||||
120 LET ST$=ST$&S$
|
||||
130 NEXT
|
||||
140 LET STRING$=ST$
|
||||
150 END DEF
|
||||
Loading…
Add table
Add a link
Reference in a new issue