10 dim a$(2) 20 a$(0)="one" 30 a$(1)="two" 40 a$="error" 50 print a$(0):re 100 sleep 1000:goto 100