'================================== 
 ' This is a remark 
 '================================== 
 
 DIM a$
 DIM b$[6]
 DIM i
 
 a$ = "The " & "value " & "of " & "pi:" & STR$(ATN(1.0) * 4.0)
 
 ?  a$
 ? 
 
 FOR i = 1 TO 5
   b$[i] = a$
 NEXT i
 
 FOR i = 1 TO 5
   ?  "The answer is >>", b$[i]
 NEXT i
 ? 
 FOR i = 1 TO 5
   ?  "The ", "value ", "of ", "pi:", STR$(ATN(1.0) * 4.0)
 NEXT i