8 lines
96 B
QBasic
8 lines
96 B
QBasic
|
PUTS("abc")
|
||
|
|
END
|
||
|
|
|
||
|
|
SUB PUTS(s$)
|
||
|
|
FOR i=1 to LEN(s$) : print mid$(s$,i,1); : NEXT
|
||
|
|
PRINT
|
||
|
|
END SUB
|