10 REM DATA: values written in the program
20 DIM NAME$(10)
30 FOR I=1 TO 4
40   READ NAME$,AGE
50   PRINT NAME$;" is ";AGE
60 NEXT I
70 RESTORE 1010
80 READ NAME$,AGE
90 PRINT "Again: ";NAME$
100 END
1000 DATA Anna,12
1010 DATA Boris,15,Cyril,9
1020 DATA Dana,11