1 DATA 7,9,8,2,6,3,1,4,5
10 FOR K=1 TO 13
20 READ L:PRINT L;" ";
30 NEXT:PRINT