10 DIM N$(10),C%(10) 20 FOR X%=1 TO 8 30 READ N$(X%) 40 NEXT 50 FOR X%=1 TO 8 60 READ C%(X%) 70 NEXT 80 FOR X%=1 TO 8 90 PRINT N$(X%),C%(X%) 100 NEXT 110 FILE=OPENOUT("SCORES") 120 FOR X%=1 TO 8 130 PRINT# FILE,N$(X%),C%(X%) 140 NEXT 150 CLOSE# FILE 160 END 170 DATA ZIPPY,SPEEDY,FAST ED,HUNTER,K ILLER,SPLASHER,DESTROYER,BOMBER 180 DATA 400,450,500,550,600,650,700,7 50,800,850