10 REM Strings: variables that hold text
20 DIM NAME$(20),GREETING$(40)
30 NAME$="Atari"
40 PRINT NAME$
50 PRINT "Length: ";LEN(NAME$)
60 PRINT "First letter: ";NAME$(1,1)
70 PRINT "Letters 2 to 4: ";NAME$(2,4)
80 PRINT "From the 3rd on: ";NAME$(3)
90 GREETING$="Hello, "
100 GREETING$(LEN(GREETING$)+1)=NAME$
110 PRINT GREETING$
120 NAME$(1,1)="a"
130 PRINT NAME$
140 DIM SHORT$(3)
150 SHORT$="ABCDEFGH"
160 PRINT SHORT$